我有一个包含如下数据的文件:
text1, text2, text3,
text4
text5, text6, text7,
text8
我需要将 text4、text8 带到以逗号结尾的上一行。请问我怎样才能做到这一点?
编辑:请注意,我有数千行。我需要自动化这个过程。
我有一个包含如下数据的文件:
text1, text2, text3,
text4
text5, text6, text7,
text8
我需要将 text4、text8 带到以逗号结尾的上一行。请问我怎样才能做到这一点?
编辑:请注意,我有数千行。我需要自动化这个过程。
尝试以下perl
命令:
$ perl -p -e 's/,\n/, /g' file
text1, text2, text3, text4
text5, text6, text7, text8
> perl -pe 'if(/,\n/){$_=~s/\n//g}' temp
text1, text2, text3,text4
text5, text6, text7,text8
就地做:
perl -pi -e 'if(/,\n/){$_=~s/\n//g}' temp
Perl 可能是最简单的工具:
perl -wpe 'chomp if /,$/' file
这说:打印“文件”的所有行,但如果该行以逗号结尾,则省略换行符。