use Text::CSV;
my @list = csv(in => "file.csv", fragment => "col=3").map(*[0]);