Select Code to Download

use Modern::Perl;
use Text::CSV;
use Data::Dumper;
...
# 1,2,3
# One,Two,Three
# Een,Twee,Drie

$VAR1 = \[
            {
              'Second' => '2',
...
              'First'  => 'Een'
            }
          ];