此Perl代码将输出提供为三.
echo one two three four | perl -pe 's/(\w+)\s(\w+)\s(\w+).*/$3/'
是否有任何优雅的解决方案可以缩短这个冗长的重复正则表达式?
Perl有一个autosplit命令行选项(参见perlrun,-a)
echo one two three four | perl -lane 'print $F[2]'
编辑:-l按Vijay 添加
-l