Search Results

Showing results 1 to 1 of 1 Search took 0.00 seconds. Search: Posts Made By: summer_cherry

Forum: Shell Programming and Scripting 11-11-2009

SED or AWK help

2,186

Posted By

perl: while(<DATA>){ my @tmp = split; ...

perl:
while(<DATA>){
my @tmp = split;
$hash{$tmp[5]}->{prefix}="@tmp[0..4]" unless $hash{$tmp[5]}->{prefix};
$hash{$tmp[5]}->{suffix}.=" "."@tmp[6..$#tmp]";
}
foreach my $key(keys %hash){...

Showing results 1 to 1 of 1