Help for this page

Select Code to Download

Select or download this

open(IPFILE,"<iplist.txt"); # open readonly
    || die "Could not open iplist.txt:$! \n";

Select or download this
@openip = split('.',$stip); # split(/\./,$stip);