foreach(@ARGV) {
   if (int($_/2) == ($_/2)) {
      print "$_\n");
   }
}