Select Code to Download

>perl -wMstrict -MData::Dumper -le
"my @array_names = qw(foo baz);
...
         'a',
         'b'
       );

>perl -wMstrict -MData::Dumper -le
"my @key_names = qw(foo baz);
...
               'a',
               'b'
             ];