Shell Programming and Scripting

Hello
i have go the following result from performing 2 testing using the same file.
I have used unix script to extract the result because the files are many as shown below.

01_gravity.f.tcov 7 3 42.86
02_gravity.f.tcov 9 4 80.86
01_velocity.f.tcov 18 18 100.00
02_velocity.f.tcov 1 19 50.00
.
.
.


I will like to reagrange the data into colunms ie test 1 and test 2 results
(01_... 02_..) so that i can use gnuplot to analyse my reuslt in this format.

#File name Test1 Test 2
#=====================================================
gravity.f.tcov 7 3 42.86 9 4 80.86
velocity.f.tcov 18 18 100.00 1 19 50.00
.
.
.

Can any one help since am new to Unix scripting. Thank you

perl:

Code:

while(<DATA>){
	chomp;
	my @tmp = split(" ",$_,2);
	my @t=split("_",$tmp[0]);
	push @{$hash{$t[1]}->{VAL}}, $tmp[1];
	$hash{$t[1]}->{SEQ}=$.;
}
foreach my $key(sort {$hash{$a}->{SEQ} <=> $hash{$b}->{SEQ}} keys %hash){
	print "$key @{$hash{$key}->{VAL}}\n";
}
__DATA__
01_gravity.f.tcov 7 3 42.86
02_gravity.f.tcov 9 4 80.86
01_velocity.f.tcov 18 18 100.00
02_velocity.f.tcov 1 19 50.00

With awk:

Code:

awk '{sub(".*_","")}
$1 in a {s=$1;$1="";a[s]=a[s] $0; next}
{a[$1]=$0}
END{for(i in a){print a[i]}}
' file

Than you all so much for your wonderful contributions

Code:

awk -F [_\ ] '{a[$2]=a[$2]" "$3" "$4" "$5} END {for (i in a) {print i,a[i]}} ' urfile