Help for this page

Select Code to Download


  1. or download this
    my $match = 1;
foreach ($var_a, $var_b, $var_c) {
...
if ($match) {
   ...
}
  2. or download this
    if ((grep /abcdefgh/, $var_a, $var_b, $var_c) == 3) {
   ...
}
  3. or download this
    use List::MoreUtils qw( all );

if (all { /abcdefgh/ } $var_a, $var_b, $var_c) {
   ...
}