NAME

CGI::Server - A CGI module to getting information about the server

SYNOPSIS

    #!/usr/bin/pugs
    use v6;
    require CGI-0.0.1;
    require CGI::Server-0.0.1;
    
    print header;
    
    if (server_port() != 80) {
        say "You are running " ~ server_software() ~ " on a non-standard port<BR>";
    }
    else {
        say "You are running " ~ server_software() ~ " on the standard port<BR>";
    }

DESCRIPTION

This module provides information about the server your CGI is running on. It also attempts to provide some useful defaults for debugging.

FUNCTIONS

server_name returns Str

server_software returns Str

server_port returns Int

server_protocol returns Str

AUTHOR

stevan little, <stevan@iinteractive.com>

COPYRIGHT

Copyright (c) 2005. Stevan Little. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html