用鉴别器连接多行

@Op,如果你想每3条记录对它们进行分组,

$ awk 'ORS=(NR%3==0)?"\n":"|"' file
a,b,c|d,e,f|g,h,i
k,l,m|n,o,p|q,r,s

用Perl,

$ perl -lne 'print $_ if $\ = ($. % 3 == 0) ? "\n" : "|"' file
a,b,c|d,e,f|g,h,i
k,l,m|n,o,p|q,r,s

因为你的标签包括 sed 下面是一种使用方法:

sed 'N;N;s/\n/|/g' datafile

呆呆地说:

BEGIN {
  state=0
}

state==0 {
  line=$0
  state=1
  next
}

state==1 {
  line=line "|" $0
  state=2
  next
}

state==2 {
  print line "|" $0
  state=0
  next
}

如果Perl很好,您可以尝试:

$i = 1;
while(<>) {
        chomp;
        unless($i % 3)
        { print "$line\n"; $i = 1; $line = "";}
        $line .= "$_|";
        $i++;
}

运行:

perl perlfile.pl 1millionlinesfile.txt

$ paste -sd'|' input | sed -re 's/([^|]+\|[^|]+\|[^|]+)\|/\1\n/g'

用 paste ,我们把线连接在一起,然后 sed 把他们掷骰子。该模式捕获3个管道终止字段的管路,并用新线替换它们各自的最终管道。

与Perl:

#! /usr/bin/perl -ln

push @a => $_;
if (@a == 3) {
  print join "|" => @a;
  @a = ();
}

END { print join "|" => @a if @a }