perl/FCGI.pm

   1 # $Id: FCGI.pm,v 1.2 1999/03/08 16:26:03 skimo Exp $
   2
   3 package FCGI;
   4
   5 require Exporter;
   6 require DynaLoader;
   7
   8 @ISA = qw(Exporter DynaLoader);
   9 # Items to export into callers namespace by default. Note: do not export
  10 # names by default without a very good reason. Use EXPORT_OK instead.
  11 # Do not simply export all your public functions/methods/constants.
  12 @EXPORT = qw(
  13
  14 );
  15
  16 $VERSION = '0.45';
  17
  18 bootstrap FCGI;
  19
  20 # Preloaded methods go here.
  21
  22 # Autoload methods go after __END__, and are processed by the autosplit program.
  23
  24 sub PRINTF {
  25   shift->PRINT(sprintf(shift, @_));
  26 }
  27
  28 1;
  29
  30 =head1 NAME
  31
  32 FCGI - Fast CGI module
  33
  34 =head1 SYNOPSIS
  35
  36     use FCGI;
  37
  38     $count = 0;
  39     while(FCGI::accept() >= 0) {
  40         print("Content-type: text/html\r\n\r\n", ++$count);
  41     }
  42
  43 =head1 DESCRIPTION
  44
  45 Functions:
  46
  47 =over 4
  48
  49 =item FCGI::accept()
  50
  51 Accepts a connection. Returns 0 on success.
  52 If a connection has been accepted before, the old
  53 one will be finished first.
  54
  55 =item FCGI::finish()
  56
  57 Finishes accepted connection.
  58
  59 =item FCGI::flush()
  60
  61 Flushes accepted connection.
  62
  63 =item FCGI::set_exit_status(status)
  64
  65 Sets the exit status that finish returns to the server.
  66
  67 =item FCGI::start_filter_data()
  68
  69 Does anyone use this function ?
  70
  71 =back
  72
  73 =head1 AUTHOR
  74
  75 Sven Verdoolaege <skimo@kotnet.org>
  76
  77 =cut
  78
  79 __END__