I fail to see how that's supposed to work. $_ -> {Action} is either "GetAll","Make" or "MakeOnly", and not some bitpattern.

But using a hash leads to one solution:

my %match = map {$_ => 1} qw /GetAll Make MakeOnly/;
...
$_ -> {Suppress} = 1 if $match {$_ -> {Action}};
[download]

Abigail