--- libhtml-clean-perl-0.8.orig/debian/rules
+++ libhtml-clean-perl-0.8/debian/rules
@@ -0,0 +1,55 @@
+#! /usr/bin/make -f
+# -*-makefile-*-
+# debian/rules file for libhtml-clean-perl
+
+include /usr/share/quilt/quilt.make
+
+PERL ?= /usr/bin/perl
+
+package := $(firstword $(shell dh_listpackages))
+tmp := $(CURDIR)/debian/$(package)
+
+build: build-stamp
+build-stamp: $(QUILT_STAMPFN)
+ dh_testdir
+ $(PERL) Makefile.PL INSTALLDIRS=vendor PERL=$(PERL)
+ $(MAKE)
+ $(MAKE) test
+ touch $@
+
+clean: checkroot unpatch
+ dh_clean build-stamp
+ # Remove the output from the test
+ rm -f t/testpages/t*.html
+ [ ! -e Makefile ] || $(MAKE) distclean
+
+binary-indep: checkroot build
+ dh_clean
+
+ $(MAKE) install DESTDIR=$(tmp)
+
+ # As this is a architecture independent package, we are not
+ # supposed to install stuff to /usr/lib. MakeMaker 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
+
+ dh_installdocs README TODO
+ dh_installchangelogs Changes
+
+ dh_compress
+ dh_fixperms
+ dh_perl
+ dh_installdeb
+ dh_gencontrol
+ dh_md5sums
+ dh_builddeb
+
+binary-arch: checkroot build
+
+binary: binary-indep binary-arch
+
+checkroot:
+ dh_testdir
+ dh_testroot
+
+.PHONY: binary binary-arch binary-indep clean checkroot build
--- libhtml-clean-perl-0.8.orig/debian/patches/no-blank-at-start_255631.patch
+++ libhtml-clean-perl-0.8/debian/patches/no-blank-at-start_255631.patch
@@ -0,0 +1,13 @@
+Index: libhtml-clean-perl/lib/HTML/Clean.pm
+===================================================================
+--- libhtml-clean-perl.orig/lib/HTML/Clean.pm 2008-03-07 10:46:49.000000000 +0200
++++ libhtml-clean-perl/lib/HTML/Clean.pm 2008-03-07 10:48:37.000000000 +0200
+@@ -429,7 +429,7 @@
+ $$h =~ s,[\r\n]+,\n,sg; # Carriage/LF -> LF
+ $$h =~ s,\s+\n,\n,sg; # empty line
+ $$h =~ s,\n\s+<,\n<,sg; # space before tag
+- $$h =~ s,\n\s+,\n ,sg; # other spaces
++ $$h =~ s,\n\s+,\n,sg; # other spaces
+
+ $$h =~ s,>\n\s*<,><,sg; # LF/spaces between tags..
+
--- libhtml-clean-perl-0.8.orig/debian/patches/pod-before-head.patch
+++ libhtml-clean-perl-0.8/debian/patches/pod-before-head.patch
@@ -0,0 +1,76 @@
+Index: libhtml-clean-perl/lib/HTML/Clean.pm
+===================================================================
+--- libhtml-clean-perl.orig/lib/HTML/Clean.pm 2008-03-07 10:37:46.000000000 +0200
++++ libhtml-clean-perl/lib/HTML/Clean.pm 2008-03-07 10:40:02.000000000 +0200
+@@ -63,6 +63,8 @@
+
+ ######################################################################
+
++=pod
++
+ =head2 $h = new HTML::Clean($dataorfile, [$level]);
+
+ This creates a new HTML::Clean object. A Prerequisite for all other
+@@ -106,6 +108,8 @@
+ # Set up the data in the self hash..
+ #
+
++=pod
++
+ =head2 $h->initialize($dataorfile)
+
+ This function allows you to reinitialize the HTML data used by the
+@@ -151,6 +155,7 @@
+ return(0); # file not found?
+ }
+
++=pod
+
+ =head2 $h->level([$level])
+
+@@ -167,6 +172,8 @@
+ return($self->{'LEVEL'});
+ }
+
++=pod
++
+ =head2 $myref = $h->data()
+
+ Returns the current HTML data as a scalar reference.
+@@ -330,6 +337,8 @@
+ 'yuml' => 255
+ );
+
++=pod
++
+ =head2 strip(\%options);
+
+ Removes excess space from HTML
+@@ -606,6 +615,8 @@
+
+ ######################################################################
+
++=pod
++
+ =head2 compat()
+
+ This function improves the cross-platform compatibility of your HTML.
+@@ -650,6 +661,8 @@
+ return($tag);
+ }
+
++=pod
++
+ =head2 defrontpage();
+
+ This function converts pages created with Microsoft Frontpage to
+@@ -677,7 +690,8 @@
+ }
+ $$h =~ s,<!--(mstheme|msthemeseparator|msnavigation)-->,,sgx;
+ }
+-=back
++
++=pod
+
+ =head1 SEE ALSO
+
--- libhtml-clean-perl-0.8.orig/debian/patches/no-use-IO_271346.patch
+++ libhtml-clean-perl-0.8/debian/patches/no-use-IO_271346.patch
@@ -0,0 +1,10 @@
+--- libhtml-clean-perl-0.8.orig/lib/HTML/Clean.pm
++++ libhtml-clean-perl-0.8/lib/HTML/Clean.pm
+@@ -1,7 +1,6 @@
+ package HTML::Clean;
+
+ use Carp;
+-use IO;
+ use Fcntl;
+ use strict;
+ require 5.004;
--- libhtml-clean-perl-0.8.orig/debian/patches/javascript-comments_303619.patch
+++ libhtml-clean-perl-0.8/debian/patches/javascript-comments_303619.patch
@@ -0,0 +1,17 @@
+Index: libhtml-clean-perl/lib/HTML/Clean.pm
+===================================================================
+--- libhtml-clean-perl.orig/lib/HTML/Clean.pm 2008-03-07 10:33:57.000000000 +0200
++++ libhtml-clean-perl/lib/HTML/Clean.pm 2008-03-07 10:37:00.000000000 +0200
+@@ -213,9 +213,10 @@
+ $js =~ s,\s+//.*?\n,\n,sig;
+
+ # insure javascript is hidden
+-
+ if ($js =~ m,<!--,) {
+- $js =~ s,</script>,// -->\n</script>,si;
++ unless ($js =~ m,(-->[\s\r\n]*</script>),i) {
++ $js =~ s,</script>,// -->\n</script>,si;
++ }
+ }
+ return($js);
+ }
--- libhtml-clean-perl-0.8.orig/debian/patches/series
+++ libhtml-clean-perl-0.8/debian/patches/series
@@ -0,0 +1,5 @@
+no-use-IO_271346.patch
+javascript-comments_303619.patch
+no-blank-at-start_255631.patch
+clean-and-pre_282503.patch
+pod-before-head.patch
--- libhtml-clean-perl-0.8.orig/debian/patches/clean-and-pre_282503.patch
+++ libhtml-clean-perl-0.8/debian/patches/clean-and-pre_282503.patch
@@ -0,0 +1,39 @@
+Index: libhtml-clean-perl/lib/HTML/Clean.pm
+===================================================================
+--- libhtml-clean-perl.orig/lib/HTML/Clean.pm 2008-03-07 10:48:37.000000000 +0200
++++ libhtml-clean-perl/lib/HTML/Clean.pm 2008-03-07 10:52:18.000000000 +0200
+@@ -366,6 +366,16 @@
+
+ =back
+
++Please note that if your HTML includes preformatted regions (this means, if
++it includes <pre>...</pre>, we do not suggest removing whitespace, as it will
++alter the rendered defaults.
++
++HTML::Clean will print out a warning if it finds a preformatted region and is
++requested to strip whitespace. In order to prevent this, specify that you don't
++want to strip whitespace - i.e.
++
++ $h->strip( {whitespace => 0} );
++
+ =cut
+
+ use vars qw/
+@@ -426,6 +436,17 @@
+ }
+
+ if ($do_whitespace) {
++ if ($$h =~ /<pre/i) {
++ warn << 'EOF'
++Warning: Stripping whitespace will affect preformatted region\'s layout
++You have a <pre> region in your HTML, which depends on the whitespace not
++being modified. You requested to strip the whitespace - The rendered results
++will be affected.
++
++Hint: Use $h->strip({whitespace => 0}); instead.
++EOF
++ }
++
+ $$h =~ s,[\r\n]+,\n,sg; # Carriage/LF -> LF
+ $$h =~ s,\s+\n,\n,sg; # empty line
+ $$h =~ s,\n\s+<,\n<,sg; # space before tag
--- libhtml-clean-perl-0.8.orig/debian/watch
+++ libhtml-clean-perl-0.8/debian/watch
@@ -0,0 +1,6 @@
+# Example watch control file for uscan
+# Rename this file to "watch" and then you can run the "uscan" command
+# to check for upstream updates and more.
+# Site Directory Pattern Version Script
+version=3
+http://search.cpan.org/dist/HTML-Clean/ .*/HTML-Clean-v?(\d[\d_.]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip) debian
--- libhtml-clean-perl-0.8.orig/debian/compat
+++ libhtml-clean-perl-0.8/debian/compat
@@ -0,0 +1 @@
+5
--- libhtml-clean-perl-0.8.orig/debian/copyright
+++ libhtml-clean-perl-0.8/debian/copyright
@@ -0,0 +1,23 @@
+This is the Debian GNU/Linux version of the HTML::Clean Perl module.
+
+From the README:
+
+5. COPYRIGHT
+
+ Copyright (c) 1999 ITU. All rights reserved. This program is
+ free software; you can redistribute it and/or modify it under the
+ same terms as Perl itself.
+
+Perl is distributed under either the Artistic licence or the GPL.
+
+The full text of the GPL is available on Debian systems in
+/usr/share/common-licenses/GPL
+
+The full text of the Artistic Licence is available on Debian systems in
+/usr/share/common-licenses/Artistic.
+
+This package has been through multiple maintainers (for a list see
+/usr/share/doc/libhtml-clean-perl/changelog.Debian.gz).
+
+Debian specific changes are copyright (c) 2000-2002, Stephen Zander
+<gibreel@debian.org>, (c) 2004 Gunnar Wolf <gwolf@debian.org>
--- libhtml-clean-perl-0.8.orig/debian/changelog
+++ libhtml-clean-perl-0.8/debian/changelog
@@ -0,0 +1,125 @@
+libhtml-clean-perl (0.8-11) unstable; urgency=low
+
+ [ gregor herrmann ]
+ * debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser
+ field (source stanza); Homepage field (source stanza). Removed: XS-
+ Vcs-Svn fields.
+ * debian/rules: delete /usr/lib/perl5 only if it exists.
+ Closes: #467905 -- FTBFS with Perl 5.10: the empty /usr/lib/perl5 is gone
+
+ [ Damyan Ivanov ]
+ * debian/watch: use dist-based URL, drop uupdate
+ * debian/rules: clean up
+ + stop ignoring distclean errors
+ + replace PREFIX by DESTDIR
+ * split source modifications to:
+ + no-use-IO_271346.patch
+ + javascript-comments_303619.patch
+ + no-blank-at-start_255631.patch
+ + clean-and-pre_282503.patch
+ + pod-before-head.patch
+ * revert unneeded escaping if double quotes within regular expressions
+ * add quilt framework
+ * Standards-Version: 3.7.3 (no changes needed)
+ * add myself to Uploaders
+
+ -- Damyan Ivanov <dmn@debian.org> Fri, 07 Mar 2008 11:18:11 +0200
+
+libhtml-clean-perl (0.8-10) unstable; urgency=low
+
+ * Use $(CURDIR) [make] instead of $(PWD) [sh] to fix issues with sudo.
+ * Add lynx | lynx-cur to Build-Depends-Indep, used by tests.
+
+ -- gregor herrmann <gregor+debian@comodo.priv.at> Sun, 1 Oct 2006 14:21:27 +0200
+
+libhtml-clean-perl (0.8-9) unstable; urgency=low
+
+ * Moved debhelper to Build-Depends.
+ * Set Standards-Version to 3.7.2 (no changes).
+ * Set Debhelper Compatibility Level to 5.
+ * Removed empty /usr/lib/perl5 from package.
+
+ -- gregor herrmann <gregor+debian@comodo.priv.at> Fri, 16 Jun 2006 16:03:18 +0200
+
+libhtml-clean-perl (0.8-8) unstable; urgency=low
+
+ * Added documentation (and a warning) explaining why HTML::Clean does
+ not properly handle preformatted areas (Closes: #282503)
+
+ -- Gunnar Wolf <gwolf@debian.org> Wed, 15 Jun 2005 10:21:58 -0500
+
+libhtml-clean-perl (0.8-7) unstable; urgency=low
+
+ * Fixed double comment tag at end of javascript (Closes: #303619)
+
+ -- Gunnar Wolf <gwolf@debian.org> Sat, 16 Apr 2005 12:33:09 -0500
+
+libhtml-clean-perl (0.8-6) unstable; urgency=low
+
+ * Added the test when building the package
+
+ -- Gunnar Wolf <gwolf@debian.org> Sat, 26 Mar 2005 13:15:44 -0600
+
+libhtml-clean-perl (0.8-5) unstable; urgency=low
+
+ * Added a debian/watch file
+ * Quoted some chars, added some POD to make editing (in emacs, at
+ least) easier
+ * No longer generates an unneeded blank at the beginning of a line
+ (Closes: #255631)
+
+ -- Gunnar Wolf <gwolf@debian.org> Sat, 26 Mar 2005 13:08:46 -0600
+
+libhtml-clean-perl (0.8-4) unstable; urgency=low
+
+ * Removed needless "use IO;" from lib/HTML/Clean.pm because it caused
+ warnings every time it was loaded (Closes: #271346)
+
+ -- Gunnar Wolf <gwolf@debian.org> Wed, 17 Nov 2004 14:32:28 -0600
+
+libhtml-clean-perl (0.8-3) unstable; urgency=low
+
+ * New maintainer - Debian Perl Group <pkg-perl-
+ maintainers@lists.alioth.debian.org> via Gunnar Wolf
+ <gwolf@debian.org> (Closes: #279789)
+ * Bumped up standards-version to 3.6.1
+
+ -- Gunnar Wolf <gwolf@debian.org> Tue, 9 Nov 2004 17:44:28 -0600
+
+libhtml-clean-perl (0.8-2) unstable; urgency=low
+
+ * Update Build-Depends-Indep to latest debhelper & perl (Yeah, I know I
+ don't need to but I was killing bugs in my perl module packages anyway).
+ * Change Priority: from extra to optional to prevent policy violations
+ in several packages that depend on this one,
+ Closes: #115641
+
+ -- Stephen Zander <gibreel@debian.org> Tue, 3 Sep 2002 18:09:06 -0700
+
+libhtml-clean-perl (0.8-1) unstable; urgency=low
+
+ * New maintainer, Closes: #80292
+ * New upstream source
+ * Updated for policy 3.5.1 and the new perl packaging policy
+
+ -- Stephen Zander <gibreel@debian.org> Fri, 2 Mar 2001 03:38:44 -0800
+
+libhtml-clean-perl (0.7-3) unstable; urgency=low
+
+ * Changed copyright info
+
+ -- Piotr Roszatycki <dexter@debian.org> Mon, 16 Aug 1999 00:09:51 +0200
+
+libhtml-clean-perl (0.7-2) unstable; urgency=low
+
+ * Standards-Version: 3.0.1.0
+
+ -- Piotr Roszatycki <dexter@debian.org> Mon, 2 Aug 1999 22:21:35 +0200
+
+libhtml-clean-perl (0.7-1) unstable; urgency=low
+
+ * Initial Debian version.
+
+ -- Piotr Roszatycki <dexter@debian.org> Thu, 8 Jul 1999 14:02:19 +0200
+
+
--- libhtml-clean-perl-0.8.orig/debian/control
+++ libhtml-clean-perl-0.8/debian/control
@@ -0,0 +1,22 @@
+Source: libhtml-clean-perl
+Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
+Uploaders: Gunnar Wolf <gwolf@debian.org>,
+ gregor herrmann <gregor+debian@comodo.priv.at>,
+ Carlo Segre <segre@debian.org>, Damyan Ivanov <dmn@debian.org>
+Section: perl
+Priority: optional
+Standards-Version: 3.7.3
+Homepage: http://search.cpan.org/dist/HTML-Clean/
+Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libhtml-clean-perl/
+Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libhtml-clean-perl/
+Build-Depends: debhelper (>= 5.0.0), quilt
+Build-Depends-Indep: perl (>> 5.8), lynx | lynx-cur
+
+Package: libhtml-clean-perl
+Architecture: all
+Depends: ${perl:Depends}
+Description: Cleans up HTML code for web browsers, not humans
+ The HTML::Clean module encapsulates a number of HTML optimizations
+ and cleanups. The end result is HTML that loads faster, displays
+ properly in more browsers. Think of it as a compiler that
+ translates HTML input into optimized machine readable code.
![[patchlogo]](http://patch-tracker.debian.org/static/img/swirlpatch.png)