Select Code to Download

    #$hash{$row}{$cols[$i+1]} = $vals[$i]; #toolic's
    $hash{"$row,$cols[$i+1]"} = $vals[$i]; #1-D version

foreach (sort keys %hash)
{
...
bbb,bar  654
bbb,baz  321
bbb,foo  987