怎么在命令行上写一个一次性的Perl程序？
比如说，统计ls命令结果共有多少行
在命令行上一次写出来，用Perl应该怎么写？

[解决办法]
统计 ls 多少行我做不出来，这个貌似收 tty 设置影响
不过单行的 perl 可以做其它东西，-e 参数就是执行
一般可以作为管道这样写：
cat xyz.file | perl -e 'print "got it" if /.*/'
或者处理文件这样写（n 是每行执行一次，l 是每次输出完自动加换行符）：
perl -nle ‘print "got it" if /.*/’xyz.file
具体参数作用请参考
perldoc perlrun
还有 http://www.chinaunix.net/jh/25/499434.html
或者用 “perl 命令行”做关键字，google 一下