1

我的 linux 系统上有一个文件 test.txt,其中包含以下格式的数据:

first second third fourth 10  
first second third fourth 20  
fifth sixth seventh eighth 10  
mmm nnn ooo ppp 10  
mmm nnn ooo ppp 20   

我需要修改格式如下 -

first second third fourth 10 20  
fifth sixth seventh eighth 10 0  
mmm nnn ooo ppp 10 20  

我试过以下代码

cat test.txt | sed 'N;s/\n/ /' | awk -F" " '{if ($1~$5){print $1" "$2" "$3" "$4" "$8} else { print $0 }}'

但这并没有提供所需的输出。当有一行下面没有类似的行时,此命令将失败。你能建议我解决这个问题吗?

4

3 回答 3

0

重用我的解决方案 (J4F)

cat file.txt | sort | while read L;
do
  y=`echo $L | rev | cut -f2- -d' ' | rev`;
  {
    test "$x" = "$y" && echo -n " `echo $L | awk '{print $NF}'`";
  } || 
  {
    x="$y";echo -en "\n$L"; 
  };
done
于 2013-08-02T14:01:55.133 回答
0

这是一种方法:

awk ' {
  last=$NF; $NF=""
  if($0==previous) {
    tail=tail " " last
  }
  else {
    if(previous!="") {
      if(split(tail,foo)==1) tail=tail " 0"
      print previous tail
    }
    previous=$0
    tail=last
  }
}
END {
    if(previous!="") print previous tail
}
'
于 2013-08-02T13:38:25.010 回答
0

Perl 解决方案:

perl -ne '/^(.*) (\S+)/ and push @{ $h{$1} },$2 }{ print "$_ @{$h{$_}}\n" for keys %h' < test.txt
于 2013-08-02T13:38:51.227 回答