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;

##</code><code>##

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

##</code><code>##

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