use Data::Table;
my $t = Data::Table::fromCSV("aaa.csv");
my $c = $t->subTable(undef, ['MyColumnHeader']);
my $column_data_ref = $c->data;