Help for this page

Select Code to Download

Select or download this

print "Host: ";
chop ($host = <STDIN>);
print "Port to start (1-66535): ";
...
print O "\n ---------------------E-O-F------------------------\n";
close(O);
}

Select or download this

print "Host: ";
chop ($host = <STDIN>);
print "Port to start (1-66535): ";
...
            
print O "\n ---------------------E-O-F------------------------\n";
close(O);