Select Code to Download

my $arref1 = [
            'foo bar quux bam',
...
                'foe -4 bar -4 quex 2 bem',
                'foa -4 bor -4 quax 2 bom',
              );

my $arref2 = [
               'foo bam',
...
               'foe -2 bem',
               'foa -2 bom',
              );