my ($desc,$code) = unpack("A60 A*",$line);#or however long 1st field is.
$description_hash{$code}=$desc;