Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
      print $line;
    }
    close SOCKET or die "close: $!";
    
  2. or download this
    POST /quotes.cgi HTTP/1.0
    Host: localhost
    ...
    
    <title>403 Forbidden</title>
    <h1>403 Forbidden</h1>
    
  3. or download this
        while ($conn = $self->accept) {
            my $rq = $conn->get_request;
    ...
            $conn->close;
            $conn = undef;          # close connection
        }
    
  4. or download this
    #!/usr/bin/perl
    use strict;
    ...
      print $line;
    }
    close SOCKET or die "close: $!";
    
  5. or download this
    POST /RPC2 HTTP/1.0
    Host: localhost
    ...
    <param><value><double>5.24</double></value></param>
    </params>
    </methodResponse>