Shell Programming and Scripting

chr1 100 200
chr1 200 300
chr1 300 400
chr1 400 500
chr1 500 600
chr1 600 700
chr1 700 800
chr1 800 900
chr1 900 920
chr1 940 960

chr1 100 600
chr1 600 960

awk ' NR == 1 {
                printf "%s %d ", $1, $2
                next
} NR%5 == 0 {
                printf "%d\n", $3
                getline
                printf "%s %d ", $1, $2
} END {
                printf "\n"
} ' file

awk '{ x=NR%5 }
x==1 { printf "%s %d",$1,$2 }
x==0 { printf " %d\n",$3 }
' file

awk 'NR%5==1 {a=$2} ! NR%5 {$2=a; print}' infile

sed 'N;N;N;N;s/[^ ]*\n.* //' file

perl -lane 'if(my $pos = ($.%5 ... $.%5==0)) {
 $start = "$F[0] $F[1]" if $pos==1;
 print "$start $F[2]" if $pos =~ /E0$/; 
}' file

awk 'NR%5==1 {a=$2} ! NR%5 {$2=a; print}' infile

awk 'NR%5==1 {a=$2} NR%5==0 {$2=a; print}' infile
chr1 100 600
chr1 600 960