$ip_no = $ARGV[0];
chomp($ip_no);
print "$ip_no\n";
$flag=0;
while(!$flag)
{
 if($ip_no =~ /\D/ || $ip_no=~ //)
 {
  print "enter number\n";
  $ip_no=<STDIN>;
  chomp($ip_no);
 }
 else
 {
  if ($ip_no%2 ==0)
  {
   print "well done bye bye\n";
   $flag=1;
  }
  else
  {
   print "u r expected to enter an odd number\n";
   $ip_no=<STDIN>;
   chomp($ip_no);
  }
 }
}