use Text::CSV_XS "csv";

# read only column 3
my $aoa = csv (in => "file.csv", fragment => "col=3");

# convert to array of strings
my @list = map { $_->[0] } @$aoa;