pipe ls输出到一行perl脚本

Din*_*esh 2 bash perl solaris

命令

ls | perl -lane "print $ARGV[0]"
Run Code Online (Sandbox Code Playgroud)

我试图将ls输出传递给一行perl脚本并打印参数,但我得到以下输出.使用的perl版本是针对sun4-solaris-64int构建的5.8.4.

结果

ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
ARRAY(0x229e8)
Run Code Online (Sandbox Code Playgroud)

列出目录中的文件需要进行哪些更改?

Rom*_*aka 5

当前行被分配给$_,所以你想要类似的东西

ls | perl -lne 'print $_'
Run Code Online (Sandbox Code Playgroud)