Select Code to Download

$VAR1 = [
          'one',
...
          'blue',
          'fish'
        ];

say Dumper( [ map { $_ => "fish" } qw(one two red blue) ] );