my $idx = substr $Fld57, 3, 5;
$CNT{$idx}{$Fld1}{$Fld15}++;
$COST{$idx}{$Fld1}{$Fld15} += $Fld14;