在Perl单行中转换“awk'{print $2 >> $1}’文件”的最

发布时间：2020-12-16 06:07:45 所属栏目：大数据来源：网络整理

导读：我怎么能转换： awk '{print $2 $1}' file 在一个简短的Perl单线程？ “文件”可能如下所示： fruit banana vegetable beetroot vegetable carrot mushroom chanterelle fruit apple 解决方法不是纯粹的Perl,但你可以这样做： perl -nae '`echo $F[1] $F[0]

我怎么能转换：

awk '{print $2 >> $1}' file

在一个简短的Perl单线程？

“文件”可能如下所示：

fruit banana
vegetable beetroot
vegetable carrot
mushroom chanterelle
fruit apple

解决方法

不是纯粹的Perl,但你可以这样做：

perl -nae '`echo $F[1] >> $F[0]`' input_file

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!

在Perl单行中转换“awk&#39;{print $2 &gt;&gt; $1}’文件”的最

解决方法

在Perl单行中转换“awk'{print $2 >> $1}’文件”的最