Select Code to Download

$ cat dummy.csv
a,b,c
d,e,f
g,h,i

#!/usr/bin/env perl

...
}

print "@columns\n";

$ ./column_extract.pl
b e h