@ARGV=qw# larry moe curly#;while (<>){ chomp; print "It was $_ that I saw in some stooge_like file!\n";}
#从larry,moe和curly三个文件中读取行信息
