Bryar::Frontend::CGI - Common Gateway Interface to Bryar

Bryar documentation Contained in the Bryar distribution.

Index

Code Index:

NAME

Top

Bryar::Frontend::CGI - Common Gateway Interface to Bryar

DESCRIPTION

Top

This is a frontend to Bryar which is used when Bryar is being driven as an ordinary CGI program.

LICENSE

Top

This module is free software, and may be distributed under the same terms as Perl itself.

AUTHOR

Top

Copyright (C) 2003, Simon Cozens simon@kasei.com

Bryar documentation Contained in the Bryar distribution. 
package Bryar::Frontend::CGI;
use base 'Bryar::Frontend::Base';
use 5.006;
use strict;
use warnings;
use Carp;
our $VERSION = '1.1';
use CGI ();
my $cgi = new CGI;


sub obtain_url { $cgi->url() }
sub obtain_path_info { $cgi->path_info() }
sub obtain_params { map { $_ => $cgi->param($_) } $cgi->param }
sub get_header { my $self = shift; $cgi->http(shift) }
sub send_data { my $self = shift; binmode(STDOUT, ':utf8'); print "\n",@_ }
sub send_header { my ($self, $k, $v) = @_; print "$k: $v\n"; }

1;