my $arref2 = [
               'foo bam',
               'foi bim',
               'foe bem',
               'foa bom',
              ];

my $inst2 =  '3 A -2 D';

# intended result
my @result2 = (
               'foo -2 bam',
               'foi -2 bim',
               'foe -2 bem',
               'foa -2 bom',
              );