in reply to Hash of Hashes not filling - only using last line of file
my %IACISBN_ENUM = map { chomp($line); my ($IacIsbn, $Title, $EPI, $BundleCode) = split "\t"; ( $IacIsbn => { 'Title' => $Title, 'EPI' => $EPI, 'Bundle' => $BundleCode } ) } <FILE>; close FILE;
|
|---|