> $1 }' file"的最佳方法是什么?-6ren"> > $1 }' file"的最佳方法是什么?-我怎么能转换: awk '{print $2 >> $1}' file 在一个简短的 Perl one-liner 中? "file"可能如下所示: fruit banana vegetable be-6ren">
gpt4 book ai didi

perl - 在 Perl 单行中转换 "awk ' {print $2 >> $1 }' file"的最佳方法是什么?

转载 作者:行者123 更新时间:2023-12-01 07:46:55 27 4
gpt4 key购买 nike

我怎么能转换:

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

在一个简短的 Perl one-liner 中?

"file"可能如下所示:

fruit banana
vegetable beetroot
vegetable carrot
mushroom chanterelle
fruit apple

最佳答案

可能还有其他一些方法,但这是我能想到的

perl -ane 'open(FILE,">>",$F[0]); print FILE $F[1];close(FILE);' file

关于perl - 在 Perl 单行中转换 "awk ' {print $2 >> $1 }' file"的最佳方法是什么?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3849015/

27 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com