$hash1{fname} = $rray[1];
$hash2{$record} = %hash1;