NB啊,一个更比一个短,哈哈。
xargs -d'\n' -n2
perl -ne  '$.%2==0 ? print : chomp && print'  file.txt
awk 'NR%2{printf $0"\t"}(NR-1)%2{print $0}' urfile


在 2013年8月20日下午3:02,夏凯 <walke...@gmail.com>写道:

> On 2013年08月20日 14:59, 李相辰 wrote:
>
>> 完全对awk不懂,能在perl上给点提示吗?
>>
> awk版本awk 'NR%2{printf $0"\t"}(NR-1)%2{print $0}' urfile
> 说下原理吧,其实很简单,判断当前行是奇数行还是偶数行,**奇数行,打 印$0+\t,注意,不要\n;偶数行打印$0+\n。
>
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
> 要退订此论坛并停止接收此论坛的电子邮件,请发送电子邮件到 
> perlchina+unsubscribe@**googlegroups.com<perlchina%2bunsubscr...@googlegroups.com>
> 。
> 要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
> 通过以下网址访问此论坛:http://groups.**google.com/group/perlchina<http://groups.google.com/group/perlchina>
> 。
> 要查看更多选项,请访问 
> https://groups.google.com/**groups/opt_out<https://groups.google.com/groups/opt_out>
> 。
>



-- 
-
http://www.54chen.com 坚持科学 分享技术
http://twitter.com/54chen

-- 
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要退订此论坛并停止接收此论坛的电子邮件,请发送电子邮件到 perlchina+unsubscr...@googlegroups.com。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
通过以下网址访问此论坛:http://groups.google.com/group/perlchina。
要查看更多选项,请访问 https://groups.google.com/groups/opt_out。

回复