Help for this page

Select Code to Download


  1. or download this
    my $num= shift @ARGV;
    print "Your number ($num) is odd.\n"   if  $num & 1;
    
  2. or download this
    my $num= shift @ARGV;
    print "Your number ($num) is odd.\n"   if  $num % 2;