Help for this page

Select Code to Download


  1. or download this
    push @{ ($_ % 2) ? @odd : @even }, $_ foreach @numbers;
  2. or download this
    push @{ (/PAT/) ? @match : @nonmatch }, $_ foreach @words;
  3. or download this
    push @{ (/PAT/) ? \@match : \@nonmatch }, $_ foreach @words;