print {$fh{$record[0]}} $_;