If you want to read a CSV file, Text::CSV might be of interest.

That being said, why is it so important for you to get the contets in hash and/or array references? That's just an implementation detail, is it not?

Look at all you missed

 [CSV hash ] CSV hash

Best way to match a hash with large CSV file

perl hash to CSV using Text::CSV_XS

Issue parsing CSV into hashes?

Veriable Length Array/Hash derived from CSV to populate an XML

extracting data from CSV files and making hash of hashes

Re^2: build hash from csv file

Encoding a hash in perl before saving it as a CSV file

hash from CSV-like structure

Read the csv file to a hash....

Parsing CSV into a hash

build hash from csv file

Converting a CSV list to a list of hashrefs naming the fields

And, use Text::CSV or Text::xSV

Examples at

• Merge two files with similar column entries
• Opening multiple files ( csvpaste.pl )
• Open multiple file handles?
• X, Y Table structure
• How to extract the particular residues from PDB files(text csv split hash bioperl)
• Select only desired features from a text (text csv split hash bioperl)
• Sort on Table headers (text csv split hash bioperl)
• I need help joining tab-delimited files/tables!
• split then join based on common value in field
• Smart way to read a file vertically?
• reformatting tab delimited file
• edit a CSV and "in-place" replacement
• Re: Reversing a mysql table, transpose-tsv -- invert a tab-delimited table

• Text::CSV

  examples/csv2xls	Script to onvert CSV files to M$Excel
  examples/csv-check	Script to check a CSV file/stream
  examples/csvdiff	Script to shoff diff between sorted CSV files
  examples/parser-xs.pl	Parse CSV stream, be forgiving on bad lines

And there are many more, every other week , like clockwork...