Help for this page

Select Code to Download


  1. or download this
    Client         Server
    
    ...
              < -- OK/ERROR text
    MSG text  -- >
              < -- MSG nick text/ERROR text
    
  2. or download this
    #!/usr/bin/perl
    use utf8;
    ...
        #print STDOUT "The following data received form Server: (\ ".$_[0]
    +." \)\n";
        return $_[0];
    }
    
  3. or download this
    #!/usr/bin/perl
    use utf8;
    ...
        close($sock);
        }
    }