- or download this
for (@tabs) {
if (
...
$_->{Suppress} = 1;
}
}
- or download this
for my $hash (@tabs) {
if (grep {$hash->{Action} eq $_} qw/
...
$hash->{Suppress} = 1;
}
}
- or download this
for (@tabs) {
if ($_->{Action} =~ /(^GetAll$)|(^Make$)|(MakeOnly$)/) {
$_->{Suppress} = 1;
}
}
- or download this
for (@tabs) {
if ($_->{Action} eq 'GetAll' || 'Make' || 'MakeOnly') {
$_->{Suppress} = 1;
}
}