Perl glob一个衬垫

Question

我在perl one liner中工作以反转我的文件内容或执行操作，我能够生成脚本和一个班轮，但这一个班轮只能通过逐个文件输入。

perl -i -ne '$a=reverse $_;print "$a\n"' <filename>

我想改变我的一个班轮来获取一系列文件的输入，但当我这样做时：

perl -i -ne '$a=reverse $_;print "$a\n"' | ls -al

我只是得到ls -al屏幕输出不确定如何继续。

谢谢

Answer 1

你可以使用xargs（1）：

ls | xargs perl -i -ne '$a=reverse $_;print "$a\n"' 

Answer 2

perl -nle '$c=reverse;print $c' * .*