Select Code to Download

my @array1 = qw(foo foo bar baz);
my @array2 = qw(bar grmpf asdf);
...
$VAR2 = [
          'bar'
        ];