Select Code to Download

DB<69> p $_[0]
DB<70> x $_[0]
0  "\c@\c@\c@\c@"

          #if (substr($hex_ip,0,1) eq ""){
          if ($hex_ip !~ m/0x.*/){
          $ip = "0.0.0.0";
            }