Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

#Client
...
my $answer = <$socket>;
print $answer;
close($socket);
  2. or download this
    #!/usr/bin/perl -w

#Server
...
}

close($server);