$ip_no = $ARGV[0];
    if ($ip_no!="") {
    
    	$get_mod_op = get_mod_val($ip_no);
    	if ($ip_no =~ /\D/){
    		print "Entered number only.....";
    		exit;
    	}else{
    		if ($get_mod_op==1) {
    			print "Good odd number(${get_mod_op}): ${ip_no} ";
    			exit;
    		}else{
    			print "Good even number(${get_mod_op}): ${ip_no} ";
    			exit;
    		}
    
    	}
    }else{
    	print "Enter number.";
    	exit;
    }