Help for this page

Select Code to Download

Select or download this

use Socket;

...
    my $line = <$sock>;
    print $line;
}

Select or download this

use Socket;

...
    my $line = <$sock>;
    print $line;
}