--- libpod-webserver-perl-3.05.orig/debian/podwebserver.1
+++ libpod-webserver-perl-3.05/debian/podwebserver.1
@@ -0,0 +1,250 @@
+.\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.32
+.\"
+.\" Standard preamble:
+.\" ========================================================================
+.de Sh \" Subsection heading
+.br
+.if t .Sp
+.ne 5
+.PP
+\fB\\$1\fR
+.PP
+..
+.de Sp \" Vertical space (when we can't use .PP)
+.if t .sp .5v
+.if n .sp
+..
+.de Vb \" Begin verbatim text
+.ft CW
+.nf
+.ne \\$1
+..
+.de Ve \" End verbatim text
+.ft R
+.fi
+..
+.\" Set up some character translations and predefined strings.  \*(-- will
+.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
+.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
+.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
+.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
+.\" nothing in troff, for use with C<>.
+.tr \(*W-
+.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
+.ie n \{\
+.    ds -- \(*W-
+.    ds PI pi
+.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
+.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
+.    ds L" ""
+.    ds R" ""
+.    ds C` ""
+.    ds C' ""
+'br\}
+.el\{\
+.    ds -- \|\(em\|
+.    ds PI \(*p
+.    ds L" ``
+.    ds R" ''
+'br\}
+.\"
+.\" If the F register is turned on, we'll generate index entries on stderr for
+.\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
+.\" entries marked with X<> in POD.  Of course, you'll have to process the
+.\" output yourself in some meaningful fashion.
+.if \nF \{\
+.    de IX
+.    tm Index:\\$1\t\\n%\t"\\$2"
+..
+.    nr % 0
+.    rr F
+.\}
+.\"
+.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
+.\" way too many mistakes in technical documents.
+.hy 0
+.if n .na
+.\"
+.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
+.\" Fear.  Run.  Save yourself.  No user-serviceable parts.
+.    \" fudge factors for nroff and troff
+.if n \{\
+.    ds #H 0
+.    ds #V .8m
+.    ds #F .3m
+.    ds #[ \f1
+.    ds #] \fP
+.\}
+.if t \{\
+.    ds #H ((1u-(\\\\n(.fu%2u))*.13m)
+.    ds #V .6m
+.    ds #F 0
+.    ds #[ \&
+.    ds #] \&
+.\}
+.    \" simple accents for nroff and troff
+.if n \{\
+.    ds ' \&
+.    ds ` \&
+.    ds ^ \&
+.    ds , \&
+.    ds ~ ~
+.    ds /
+.\}
+.if t \{\
+.    ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
+.    ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
+.    ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
+.    ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
+.    ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
+.    ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
+.\}
+.    \" troff and (daisy-wheel) nroff accents
+.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
+.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
+.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
+.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
+.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
+.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
+.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
+.ds ae a\h'-(\w'a'u*4/10)'e
+.ds Ae A\h'-(\w'A'u*4/10)'E
+.    \" corrections for vroff
+.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
+.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
+.    \" for low resolution devices (crt and lpr)
+.if \n(.H>23 .if \n(.V>19 \
+\{\
+.    ds : e
+.    ds 8 ss
+.    ds o a
+.    ds d- d\h'-1'\(ga
+.    ds D- D\h'-1'\(hy
+.    ds th \o'bp'
+.    ds Th \o'LP'
+.    ds ae ae
+.    ds Ae AE
+.\}
+.rm #[ #] #H #V #F C
+.\" ========================================================================
+.\"
+.IX Title "Webserver 3"
+.TH Webserver 3 "2006-12-20" "perl v5.8.8" "User Contributed Perl Documentation"
+.SH "NAME"
+Pod::Webserver \-\- minimal web server to serve local Perl documentation
+.SH "SYNOPSIS"
+.IX Header "SYNOPSIS"
+.Vb 2
+\&  % podwebserver
+\&  You can now point your browser at http://localhost:8020/
+.Ve
+.SH "DESCRIPTION"
+.IX Header "DESCRIPTION"
+This module can be run as an application that works as a
+minimal web server to serve local Perl documentation.  It's like
+perldoc except it works through your browser.
+.PP
+Run \fIpodwebserver \-h\fR for a list of runtime options.
+.ie n .SH "SECURITY (AND @INC)"
+.el .SH "SECURITY (AND \f(CW@INC\fP)"
+.IX Header "SECURITY (AND @INC)"
+Pod::Webserver is not what you'd call a gaping security hole \*(--
+after all, all it does and could possibly do is serve \s-1HTML\s0
+versions of anything you could get by typing \*(L"perldoc
+SomeModuleName\*(R".  Pod::Webserver won't serve files at
+arbitrary paths or anything.
+.PP
+But do consider whether you're revealing anything by 
+basically showing off what versions of modules you've got
+installed; and also consider whether you could be revealing
+any proprietary or in-house module documentation.
+.PP
+And also consider that this exposes the documentation
+of modules (i.e., any Perl files that at all look like
+modules) in your \f(CW@INC\fR dirs \*(-- and your \f(CW@INC\fR probably
+contains \*(L".\*(R"!  If your current working directory could
+contain modules \fIwhose Pod\fR you don't
+want anyone to see, then you could do two things:
+The cheap and easy way is to just chdir to an
+uninteresting directory:
+.PP
+.Vb 1
+\&  mkdir ~/.empty; cd ~/.empty; podwebserver
+.Ve
+.PP
+The more careful approach is to run podwebserver
+under perl in \-T (taint) mode (as explained in
+perlsec), and to explicitly specify what extra
+directories you want in \f(CW@INC\fR, like so:
+.PP
+.Vb 1
+\&  perl \-T \-Isomepath \-Imaybesomeotherpath \-S podwebserver
+.Ve
+.PP
+You can also use the \-I trick (that's a capital \*(L"igh\*(R", 
+not a lowercase \*(L"ell\*(R") to add dirs to \f(CW@INC\fR even
+if you're not using \-T.  For example:
+.PP
+.Vb 1
+\&  perl \-I/that/thar/Module\-Stuff\-0.12/lib \-S podwebserver
+.Ve
+.PP
+An alternate approach is to use your shell's
+environment-setting commands to alter \s-1PERL5LIB\s0 or
+\&\s-1PERLLIB\s0 before starting podwebserver.
+.PP
+These \-T and \-I switches are explained in perlrun. But I'll note in
+passing that you'll likely need to do this to get your \s-1PERLLIB\s0
+environment variable to be in \f(CW@INC\fR...
+.PP
+.Vb 1
+\&  perl \-T \-I$PERLLIB \-S podwebserver
+.Ve
+.PP
+(Or replacing that with \s-1PERL5LIB\s0, if that's what you use.)
+.ie n .Sh "\s-1ON\s0 \s-1INDEXING\s0 '.' \s-1IN\s0 @INC"
+.el .Sh "\s-1ON\s0 \s-1INDEXING\s0 '.' \s-1IN\s0 \f(CW@INC\fP"
+.IX Subsection "ON INDEXING '.' IN @INC"
+Pod::Webserver uses the module Pod::Simple::Search to build the index
+page you see at http://yourservername:8020/ (or whatever port you
+choose instead of 8020). That module's indexer has one notable \s-1DWIM\s0
+feature: it reads over \f(CW@INC\fR, except that it skips the \*(L".\*(R" in \f(CW@INC\fR.  But
+you can work around this by expressing the current directory in some
+other way than as just the single literal period \*(-- either as some
+more roundabout way, like so:
+.PP
+.Vb 1
+\&  perl \-I./. \-S podwebserver
+.Ve
+.PP
+Or by just expressing the current directory absolutely:
+.PP
+.Vb 1
+\&  perl \-I`pwd` \-S podwebserver
+.Ve
+.PP
+Note that even when \*(L".\*(R" isn't indexed, the Pod in files under it are
+still accessible \*(-- just as if you'd typed \*(L"perldoc whatever\*(R" and got
+the Pod in \fI./whatever.pl\fR
+.SH "SEE ALSO"
+.IX Header "SEE ALSO"
+This module is implemented using many \s-1CPAN\s0 modules,
+including: Pod::Simple::HTMLBatch Pod::Simple::HTML
+Pod::Simple::Search Pod::Simple
+.PP
+See also Pod::Perldoc and <http://search.cpan.org/>
+.SH "COPYRIGHT AND DISCLAIMERS"
+.IX Header "COPYRIGHT AND DISCLAIMERS"
+Copyright (c) 2004\-2006 Sean M. Burke.  All rights reserved.
+.PP
+This library is free software; you can redistribute it and/or modify it
+under the same terms as Perl itself.
+.PP
+This program is distributed in the hope that it will be useful, but
+without any warranty; without even the implied warranty of
+merchantability or fitness for a particular purpose.
+.SH "AUTHOR"
+.IX Header "AUTHOR"
+Original author: Sean M. Burke \f(CW\*(C`sburke@cpan.org\*(C'\fR
+.PP
+Maintained by: Allison Randal \f(CW\*(C`allison@perl.org\*(C'\fR
--- libpod-webserver-perl-3.05.orig/debian/compat
+++ libpod-webserver-perl-3.05/debian/compat
@@ -0,0 +1 @@
+7
--- libpod-webserver-perl-3.05.orig/debian/libpod-webserver-perl.docs
+++ libpod-webserver-perl-3.05/debian/libpod-webserver-perl.docs
@@ -0,0 +1 @@
+README
--- libpod-webserver-perl-3.05.orig/debian/copyright
+++ libpod-webserver-perl-3.05/debian/copyright
@@ -0,0 +1,30 @@
+Format-Specification:
+    http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
+Upstream-Maintainer: Original author: Sean M. Burke sburke@cpan.org
+    Maintained by: Allison Randal allison@perl.org
+Upstream-Source: http://search.cpan.org/dist/Pod-Webserver/
+Upstream-Name: Pod-Webserver
+
+Files: *
+Copyright: Original author: Sean M. Burke sburke@cpan.org
+    Maintained by: Allison Randal allison@perl.org
+License-Alias: Perl
+License: Artistic | GPL-1+
+
+Files: debian/*
+Copyright: 2009, Alejandro Garrido Mota <garridomota@gmail.com>
+License: Artistic | GPL-1+
+
+License: Artistic
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the Artistic License, which comes with Perl.
+    On Debian GNU/Linux systems, the complete text of the Artistic License
+    can be found in `/usr/share/common-licenses/Artistic'
+
+License: GPL-1+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 1, or (at your option)
+    any later version.
+    On Debian GNU/Linux systems, the complete text of the GNU General
+    Public License can be found in `/usr/share/common-licenses/GPL'
--- libpod-webserver-perl-3.05.orig/debian/rules
+++ libpod-webserver-perl-3.05/debian/rules
@@ -0,0 +1,72 @@
+#!/usr/bin/make -f
+#export DH_VERBOSE=1
+export PERL_MM_USE_DEFAULT=1
+
+PACKAGE=$(shell dh_listpackages)
+
+ifndef PERL
+PERL = /usr/bin/perl
+endif
+
+TMP     =$(CURDIR)/debian/$(PACKAGE)
+
+build: build-stamp
+build-stamp:
+	dh_testdir
+
+	$(PERL) Makefile.PL INSTALLDIRS=vendor
+	$(MAKE) OPTIMIZE="-Wall -O2 -g"
+
+	touch build-stamp
+
+clean:
+	dh_testdir
+	dh_testroot
+
+	[ ! -f Makefile ] || $(MAKE) realclean
+	[ ! -f no_apply.t ] || mv no_apply.t t/03_daemon.t
+
+	dh_clean build-stamp install-stamp
+
+install: build install-stamp
+install-stamp:
+	dh_testdir
+	dh_testroot
+	dh_clean
+
+	mv t/03_daemon.t no_apply.t
+	$(MAKE) test
+	$(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
+
+	# As this is a architecture independent package, we are not
+	# supposed to install stuff to /usr/lib. MakeMaker (on Perl <= 5.8.x)
+	# creates the dirs, we delete them from the deb:
+	 ! -d $(TMP)/usr/lib/perl5 ] || \
+		rmdir --ignore-fail-on-non-empty --parents --verbose \
+		$(TMP)/usr/lib/perl5
+
+	touch install-stamp
+
+binary-arch:
+
+binary-indep: build install
+	dh_testdir
+	dh_testroot
+	dh_installman debian/podwebserver.1
+	dh_installdocs README
+	dh_installchangelogs ChangeLog
+	dh_perl
+	dh_link
+	dh_strip
+	dh_compress
+	dh_fixperms
+	dh_installdeb
+	dh_gencontrol
+	dh_md5sums
+	dh_builddeb
+
+source diff:                                                                  
+	@echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary
--- libpod-webserver-perl-3.05.orig/debian/changelog
+++ libpod-webserver-perl-3.05/debian/changelog
@@ -0,0 +1,46 @@
+libpod-webserver-perl (3.05-1) unstable; urgency=low
+
+  * New upstream release
+  * Improve Format-Specification in debian/copyright
+  * Improve debian/control
+  * Add watch file 
+
+ -- Alejandro Garrido Mota <garridomota@gmail.com>  Tue, 21 Apr 2009 20:02:42 -0430
+
+libpod-webserver-perl (3.04-1.3) unstable; urgency=low
+
+  * Non-maintainer upload.
+  * Remove /usr/lib/perl5 only if it exists (needed to avoid FTBFS after
+    Perl 5.10 transition) (Closes: #483388)
+  * Fixed test that failed after Perl 5.10 transition (Closes: #467279)
+  * Fixed versioned build-dependencies which are satisfied by Perl 5.10
+    (Closes: #481959)
+
+ -- Gunnar Wolf <gwolf@debian.org>  Wed, 28 May 2008 11:15:06 -0500
+
+libpod-webserver-perl (3.04-1.2) unstable; urgency=low
+
+  * Non-maintainer upload.
+  * Restore the disabled test to t/03_daemon.t (instead of 03_daemon.t),
+    which fixes double-build FTBFS (Closes: #442649). Thanks Jose Luis
+    Rivas Contreras for the original patch.
+  * Bump Standards-Version from 3.7.2 to 3.7.3, no changes needed.
+  * Move the Homepage from the description to a source field.
+
+ -- Cyril Brulebois <cyril.brulebois@enst-bretagne.fr>  Tue, 26 Feb 2008 20:14:23 +0100
+
+libpod-webserver-perl (3.04-1.1) unstable; urgency=low
+
+  * Non-maintainer upload.
+  * Applied Jose Luis Rivas Contreras's patch, moving the 03 test case
+    (which requires network access) so it does not FTBFS (Closes:
+    #425902)
+
+ -- Gunnar Wolf <gwolf@debian.org>  Tue, 05 Jun 2007 12:23:35 -0500
+
+libpod-webserver-perl (3.04-1) unstable; urgency=low
+
+  * Initial Release (Closes: #403929).
+
+ -- Alejandro Garrido Mota <garridomota@gmail.com>  Tue, 19 Dec 2006 23:32:40 -0400
+
--- libpod-webserver-perl-3.05.orig/debian/watch
+++ libpod-webserver-perl-3.05/debian/watch
@@ -0,0 +1,2 @@
+version=3
+http://search.cpan.org/dist/Pod-Webserver/   .*/Pod-Webserver-v?(\d[\d_.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$
--- libpod-webserver-perl-3.05.orig/debian/control
+++ libpod-webserver-perl-3.05/debian/control
@@ -0,0 +1,16 @@
+Source: libpod-webserver-perl
+Section: perl
+Priority: optional
+Build-Depends: debhelper (>= 7)
+Build-Depends-Indep: perl (>= 5.6.0-12)
+Maintainer: Alejandro Garrido Mota <garridomota@gmail.com>
+Standards-Version: 3.8.1
+Homepage: http://search.cpan.org/dist/Pod-Webserver/
+
+Package: libpod-webserver-perl
+Architecture: all
+Depends: ${misc:Depends}, ${perl:Depends}
+Description: a miniature web server for reading Pod in web browsers
+ Pod::Webserver can be run as an application that works as a minimal web
+ server to serve local Perl documentation. It's like perldoc except it works
+ through your browser.