my %csvColumns = map {$csvColumns[$_] => $_} 0 .. $#csvColumns;

##</code><code>##

my %csvColumns = do {my $i = 0; map {$_ => $i++} @csvColumns};