Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
# server2way.pl - a server that reads from
...
    close $new_sock;
}
  2. or download this
    #!/usr/bin/perl -w
# client2way.pl - a client that writes to
...
print $sock "NONE\n";
print scalar <$sock>;
close $sock;
  3. or download this
    #!/usr/bin/perl -w
# client2way.pl - a client that writes to
...
print scalar <$sock>;
close $sock;