$ipaddr = "192.168.0.1";
@digit = split(/\./, $ipaddr);