use Spreadsheet::Read;

my $ss = ReadData ("file.csv");

# Spreadsheet::Read indexes from 1. 0 is the control record/column
my @sheet  = $ss->[1]; # CSV has just 1 sheet
my @column = $sheet->{cell}[4]; # 4th column, unformatted