Skip Menu |
 

This queue is for tickets about the IO-All-LWP CPAN distribution.

Report information
The Basics
Id: 8159
Status: resolved
Priority: 0/
Queue: IO-All-LWP

People
Owner: itub [...] cpan.org
Requestors: RSOD [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Attachments


Subject: Patch to pass 'gopher' URIs to LWP
Download (untitled) / with headers
text/plain 187b
The attached patch introduces basic support for 'gopher' URIs, harnessing LWP's stated support for such (5.800 here). $req = HTTP::Request->new(GET => 'gopher://gopher.sn.no/'); - R.
diff -purdN IO-All-LWP-0.11/MANIFEST IO-All-LWP-0.11-gopher/MANIFEST --- IO-All-LWP-0.11/MANIFEST Tue Jul 20 15:27:06 2004 +++ IO-All-LWP-0.11-gopher/MANIFEST Thu Oct 28 03:57:33 2004 @@ -9,6 +9,7 @@ inc/Module/Install/Win32.pm inc/Module/Install/WriteAll.pm iocp.pl lib/IO/All/FTP.pm +lib/IO/All/Gopher.pm lib/IO/All/HTTP.pm lib/IO/All/HTTPS.pm lib/IO/All/LWP.pm @@ -18,6 +19,7 @@ MANIFEST.bak META.yml README t/ftp.t +t/gopher.t t/http.t t/https.t t/lwp.t diff -purdN IO-All-LWP-0.11/lib/IO/All/Gopher.pm IO-All-LWP-0.11-gopher/lib/IO/All/Gopher.pm --- IO-All-LWP-0.11/lib/IO/All/Gopher.pm Wed Dec 31 16:00:00 1969 +++ IO-All-LWP-0.11-gopher/lib/IO/All/Gopher.pm Thu Oct 28 03:58:13 2004 @@ -0,0 +1,60 @@ +package IO::All::Gopher; +use strict; +use warnings; +our $VERSION = '0.11'; +use IO::All::LWP '-Base'; + +const type => 'gopher'; + +sub gopher { $self->lwp_init(__PACKAGE__, @_) } + +1; + +__END__ + +=head1 NAME + +IO::All::Gopher - Extends IO::All to Gopher URLs + +=head1 SYNOPSIS + + use IO::All; + + io('gopher://example.org/pub/xyz') > io('xyz'); # GET to file + +=head1 DESCRIPTION + +This module extends IO::All for dealing with Gopher URLs. +Note that you don't need to use it explicitly, as it is autoloaded by +L<IO::All> whenever it sees something that looks like a Gopher URL. + +=head1 METHODS + +This is a subclass of L<IO::All::LWP>. The only new method is C<gopher>, which +can be used to create a blank L<IO::All::Gopher> object; or it can also take an +Gopher URL as a parameter. Note that in most cases it is simpler just to call +io('gopher://example.com'), which calls the C<ftp> method automatically. + +=head1 OPERATOR OVERLOADING + +Read-only operators from IO::All may be used. < GETs a Gopher URL. + +=head1 SEE ALSO + +L<IO::All::LWP>, L<IO::All>, L<LWP>. + +=head1 AUTHORS + +Ivan Tubert-Brohman <itub@cpan.org> and +Brian Ingerson <ingy@cpan.org> + +=head1 COPYRIGHT + +Copyright (c) 2004. Ivan Tubert-Brohman and Brian Ingerson. All rights reserved. + +This program is free software; you can redistribute it and/or modify it +under the same terms as Perl itself. + +See L<http://www.perl.com/perl/misc/Artistic.html> + +=cut diff -purdN IO-All-LWP-0.11/t/gopher.t IO-All-LWP-0.11-gopher/t/gopher.t --- IO-All-LWP-0.11/t/gopher.t Wed Dec 31 16:00:00 1969 +++ IO-All-LWP-0.11-gopher/t/gopher.t Thu Oct 28 03:57:10 2004 @@ -0,0 +1,3 @@ +use Test::More tests => 1; + +use_ok('IO::All::Gopher');
Thanks, I've uploaded a new version of the distribution including the Gopher.pm module. -- Ivan


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.