ok, now the hard-core way to get this package building under Fedora Core 3

perl-www/perl-www.patch

@@ -0,0 +1,84 @@
+Index: WWW-Mechanize-1.12/Makefile.PL
+--- WWW-Mechanize-1.12/Makefile.PL.orig	2005-06-12 16:16:53 +0200
++++ WWW-Mechanize-1.12/Makefile.PL	2005-06-12 16:20:23 +0200
+@@ -6,46 +6,7 @@
+ 
+ use constant FLAG_SKIPMECHDUMP => File::Spec->catfile( "t", "SKIP-MECH-DUMP" );
+ 
+-# Much logic stolen fromm libwww-perl's Makefile.PL
+-my $skiplive = grep /--nolive/i, @ARGV;
+-my $skiplocal = grep /--nolocal/i, @ARGV;
+-
+-if ( !$skiplive ) {
+-    require IO::Socket;
+-    my $s = IO::Socket::INET->new(
+-        PeerAddr => "www.google.com:80",
+-        Timeout  => 10,
+-    );
+-    if ($s) {
+-        close($s);
+-        $skiplive = 0;
+-
+-        print <<EOT;
+-
+-Part of WWW::Mechanize's test suite is run live tests against Google.
+-Since it looks like you're connected to the Internet, these test will
+-be enabled.  If you want to disable these tests, re-run Makefile.PL with
+-the --skiplive switch.
+-
+-EOT
+-    } else {
+-        print <<EOT;
+-
+-    It seems that you are not directly connected to the Internet.  Some
+-    of the WWW::Mechanize tests interact with websites such as Google,
+-    in addition to its own internal tests.
+-
+-EOT
+-
+-        if ( prompt("Do you want to skip these tests?", "y") =~ /^y/i ) {
+-            $skiplive = 1;
+-        }
+-    } # failed connect
+-}
+-
+ my @tests = glob File::Spec->catfile( 't', '*.t' );
+-push( @tests, glob File::Spec->catfile( 't', 'local', '*.t' ) ) unless $skiplocal;
+-push( @tests, glob File::Spec->catfile( 't', 'live', '*.t' ) ) unless $skiplive;
+ 
+ my $parms = {
+     'NAME'          => 'WWW::Mechanize',
+@@ -85,33 +46,4 @@
+     touch();
+ }
+ 
+-eval { require LWP; };
+-if ($@ or ! LWP::Protocol::implementor('https') ) {
+-    print <<EOT;
+-
+-It looks like you don't have SSL capability (like IO::Socket::SSL) installed. 
+-You will not be able to process https:// URLs correctly.
+-
+-EOT
+-}
+-
+-my @missing;
+-my @nice = qw( Test::Pod Test::Memory::Cycle Test::Warn );
+-for my $nice ( @nice ) {
+-    eval "require $nice";
+-    push( @missing, $nice ) if $@;
+-}
+-
+-if ( @missing ) {
+-    @missing = map { "\t$_\n" } @missing;
+-    print <<EOT;
+-
+-WWW::Mechanize likes to have a lot of test modules for some of its tests.
+-The following are modules that would be nice to have, but not required.
+-
+-@missing
+-
+-EOT
+-}
+-
+ WriteMakefile( %$parms );

perl-www/perl-www.spec

@@ -131,6 +131,7 @@ Source42:     http://www.cpan.org/modules/by-module/HTTP/HTTP-Recorder-%{V_http_
 Source43:     http://www.cpan.org/modules/by-module/WDDX/WDDX-%{V_wddx}.tar.gz
 Source44:     http://www.cpan.org/modules/by-module/WWW/WWW-OpenSearch-%{V_www_opensearch}.tar.gz
 Source45:     http://www.cpan.org/modules/by-module/WWW/WWW-Wikipedia-%{V_www_wikipedia}.tar.gz
+Patch0:       perl-www.patch
 
 #   build information
 Prefix:       %{l_prefix}
@@ -465,6 +466,7 @@ AutoReqProv:  no
     %setup -q -T -D -a 43
     %setup -q -T -D -a 44
     %setup -q -T -D -a 45
+    %patch -p0
 
 %build
 
@@ -500,7 +502,7 @@ AutoReqProv:  no
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE26} configure build install
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE27} configure build install
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE28} configure build install
-    %{l_prefix}/bin/perl-openpkg -d %{SOURCE29} -A --nolive configure build install
+    %{l_prefix}/bin/perl-openpkg -d %{SOURCE29} configure build install
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE30} configure build install
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE31} configure build install
     %{l_prefix}/bin/perl-openpkg -d %{SOURCE32} configure build install