[Catalyst-commits] r9873 - in HTTP-Request-AsCGI/trunk: .
lib/HTTP/Request
hdp at dev.catalyst.perl.org
hdp at dev.catalyst.perl.org
Mon Apr 27 03:01:26 GMT 2009
Author: hdp
Date: 2009-04-27 04:01:26 +0100 (Mon, 27 Apr 2009)
New Revision: 9873
Added:
HTTP-Request-AsCGI/trunk/dist.ini
Removed:
HTTP-Request-AsCGI/trunk/MANIFEST.SKIP
HTTP-Request-AsCGI/trunk/Makefile.PL
HTTP-Request-AsCGI/trunk/README
Modified:
HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm
Log:
dzil-ize, fix a few typos
Deleted: HTTP-Request-AsCGI/trunk/MANIFEST.SKIP
===================================================================
--- HTTP-Request-AsCGI/trunk/MANIFEST.SKIP 2009-04-27 01:28:12 UTC (rev 9872)
+++ HTTP-Request-AsCGI/trunk/MANIFEST.SKIP 2009-04-27 03:01:26 UTC (rev 9873)
@@ -1,28 +0,0 @@
-# Avoid version control files.
-\bRCS\b
-\bCVS\b
-,v$
-\B\.svn\b
-\B\.git\b
-
-# Avoid Makemaker generated and utility files.
-\bMakefile$
-\bblib
-\bMakeMaker-\d
-\bpm_to_blib$
-\bblibdirs$
-^MANIFEST\.SKIP$
-
-# Avoid Module::Build generated and utility files.
-\bBuild$
-\b_build
-
-# Avoid temp and backup files.
-~$
-\.tmp$
-\.old$
-\.bak$
-\#$
-\b\.#
-
-^HTTP-Request-AsCGI-\d
Deleted: HTTP-Request-AsCGI/trunk/Makefile.PL
===================================================================
--- HTTP-Request-AsCGI/trunk/Makefile.PL 2009-04-27 01:28:12 UTC (rev 9872)
+++ HTTP-Request-AsCGI/trunk/Makefile.PL 2009-04-27 03:01:26 UTC (rev 9873)
@@ -1,16 +0,0 @@
-#!perl
-
-use ExtUtils::MakeMaker;
-
-WriteMakefile(
- NAME => 'HTTP::Request::AsCGI',
- VERSION_FROM => 'lib/HTTP/Request/AsCGI.pm',
- PREREQ_PM => {
- 'Carp' => 0,
- 'Class::Accessor' => 0,
- 'HTTP::Request' => 0,
- 'HTTP::Response' => 1.53,
- 'IO::File' => 0,
- 'Test::More' => 0,
- }
-);
Deleted: HTTP-Request-AsCGI/trunk/README
===================================================================
--- HTTP-Request-AsCGI/trunk/README 2009-04-27 01:28:12 UTC (rev 9872)
+++ HTTP-Request-AsCGI/trunk/README 2009-04-27 03:01:26 UTC (rev 9873)
@@ -1,89 +0,0 @@
-NAME
- HTTP::Request::AsCGI - Setup a CGI enviroment from a HTTP::Request
-
-VERSION
- 0.5_03
-
-SYNOPSIS
- use CGI;
- use HTTP::Request;
- use HTTP::Request::AsCGI;
-
- my $request = HTTP::Request->new( GET => 'http://www.host.com/' );
- my $stdout;
-
- {
- my $c = HTTP::Request::AsCGI->new($request)->setup;
- my $q = CGI->new;
-
- print $q->header,
- $q->start_html('Hello World'),
- $q->h1('Hello World'),
- $q->end_html;
-
- $stdout = $c->stdout;
-
- # enviroment and descriptors will automatically be restored
- # when $c is destructed.
- }
-
- while ( my $line = $stdout->getline ) {
- print $line;
- }
-
-DESCRIPTION
- Provides a convinient way of setting up an CGI enviroment from a
- HTTP::Request.
-
-METHODS
- new ( $request [, key => value ] )
- Contructor, first argument must be a instance of HTTP::Request
- followed by optional pairs of environment key and value.
-
- enviroment
- Returns a hashref containing the environment that will be used in
- setup. Changing the hashref after setup has been called will have no
- effect.
-
- setup
- Setups the environment and descriptors.
-
- restore
- Restores the enviroment and descriptors. Can only be called after
- setup.
-
- request
- Returns the request given to constructor.
-
- response
- Returns a HTTP::Response. Can only be called after restore.
-
- stdin
- Accessor for handle that will be used for STDIN, must be a real
- seekable handle with an file descriptor. Defaults to a tempoary
- IO::File instance.
-
- stdout
- Accessor for handle that will be used for STDOUT, must be a real
- seekable handle with an file descriptor. Defaults to a tempoary
- IO::File instance.
-
- stderr
- Accessor for handle that will be used for STDERR, must be a real
- seekable handle with an file descriptor.
-
-SEE ALSO
- examples directory in this distribution.
- WWW::Mechanize::CGI
- Test::WWW::Mechanize::CGI
-
-THANKS TO
- Thomas L. Shinnick for his valuable win32 testing.
-
-AUTHOR
- Christian Hansen, "ch at ngmedia.com"
-
-LICENSE
- This library is free software. You can redistribute it and/or modify it
- under the same terms as perl itself.
-
Added: HTTP-Request-AsCGI/trunk/dist.ini
===================================================================
--- HTTP-Request-AsCGI/trunk/dist.ini (rev 0)
+++ HTTP-Request-AsCGI/trunk/dist.ini 2009-04-27 03:01:26 UTC (rev 9873)
@@ -0,0 +1,18 @@
+name = HTTP-Request-AsCGI
+version = 0.5_03
+license = Perl_5
+author = Christian Hansen <ch at ngmedia.com>
+author = Hans Dieter Pearcey <hdp at cpan.org>
+copyright_holder = Christian Hansen <ch at ngmedia.com>
+
+[Prereq]
+Carp = 0
+Class::Accessor = 0
+HTTP::Request = 0
+HTTP::Response = 1.53
+IO::File = 0
+Test::More = 0
+
+[@Classic]
+
+[PodPurler]
Modified: HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm
===================================================================
--- HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm 2009-04-27 01:28:12 UTC (rev 9872)
+++ HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm 2009-04-27 03:01:26 UTC (rev 9873)
@@ -1,5 +1,5 @@
package HTTP::Request::AsCGI;
-
+# ABSTRACT: Set up a CGI environment from an HTTP::Request
use strict;
use warnings;
use bytes;
@@ -12,8 +12,6 @@
__PACKAGE__->mk_accessors(qw[ enviroment request stdin stdout stderr ]);
-our $VERSION = 0.5_03;
-
sub new {
my $class = shift;
my $request = shift;
@@ -274,10 +272,6 @@
__END__
-=head1 NAME
-
-HTTP::Request::AsCGI - Setup a CGI enviroment from a HTTP::Request
-
=head1 SYNOPSIS
use CGI;
@@ -316,7 +310,7 @@
=item new ( $request [, key => value ] )
-Contructor, first argument must be a instance of HTTP::Request
+Constructor, first argument must be a instance of HTTP::Request
followed by optional pairs of environment key and value.
=item enviroment
@@ -373,13 +367,4 @@
Thomas L. Shinnick for his valuable win32 testing.
-=head1 AUTHOR
-
-Christian Hansen, C<ch at ngmedia.com>
-
-=head1 LICENSE
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as perl itself.
-
=cut
More information about the Catalyst-commits
mailing list