diff options
| author | Gisle Aas <gisle@aas.no> | 2011-08-14 09:11:42 +0200 |
|---|---|---|
| committer | Gisle Aas <gisle@aas.no> | 2011-08-14 09:11:52 +0200 |
| commit | 7e13cf17dfb9371a1e9e8e4e872b5782974a8060 (patch) | |
| tree | 4ddcba2456efbbd244c260a106d902cab3e52a7f | |
| parent | 8783e99aa4eb979de72c3404ecf67768f5b60536 (diff) | |
| download | uri-7e13cf17dfb9371a1e9e8e4e872b5782974a8060.tar.gz | |
Don't need to work around lack of \z-support any more
This was required for perl-5.004 to work, but we require perl-5.8 now.
| -rw-r--r-- | Makefile.PL | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/Makefile.PL b/Makefile.PL index 8abb6cb..3f1a351 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -1,21 +1,6 @@ require 5.008001; use ExtUtils::MakeMaker; -if ("foo" !~ /\Afoo\z/) { - for $file ("URI", "URI/urn") { - print "\\z not supported by this perl. Fixing $file.pm...\n"; - rename("$file.pm", "$file.pm.bak") || die; - open( IN, "<$file.pm.bak" ) || die; - open( OUT, ">$file.pm" ) || die; - while( <IN> ) { - $_ =~ s/\\z/\\Z/g; - print OUT; - } - close( OUT ) || die; - close( IN ) || die; - } -} - WriteMakefile( 'NAME' => 'URI', 'VERSION_FROM' => 'URI.pm', |