i got this to work.  my method is ugly.  i noticed everywhere that
URI::URL  was being used in mod_perl and embperl, LWP::UserAgent
was being used.

also, i found this is the LWP (libwww-perl-5.5395) release notes:

    HTTP::Request, HTTP::Response will by default now use "URI" class,
    instead of "URI::URL", when constructing its URI objects.  This
    has a potential for breaking existing code as URI::URL objects had
    some extra methods that external code might depend upon.

so - i performed this patch in (perlsitelib)/(perlversion)/LWP:
--------snip---------
--- UserAgent.pm.orig   Thu Aug  2 14:12:56 2001
+++ UserAgent.pm        Tue Aug 21 12:09:24 2001
@@ -2,7 +2,7 @@

 package LWP::UserAgent;
 use strict;
-
+use URI::URL; # make mod_perl and others happy
 =head1 NAME

 LWP::UserAgent - A WWW UserAgent class
--------snip---------

looks like the next version of mod_perl and embperl will need
to be patched:
'use URI::URL'

in all places where its objects are created and
it's methods are being called.

hope this helps,

___cliff rayman___ wrote:

> this is not a good fix.  i went to build embperl, and got
> the same URI::URL warnings when it attempted to test
> with mod_perl.  embperl also expects to be able to call
> 'new URI::URL' without a previous use/require in the code.
>
> i did test to make sure my URI::URL was installed properly
> perl -MURI::URL -e 'print "$URI::URL::VERSION\n"'
> which returns 5.02.
>
> This is perl, v5.6.1 built for i686-linux
> Server: Apache/1.3.20 (Unix) mod_perl/1.26 mod_ssl/2.8.4 OpenSSL/0.9.6b
>
> i'll have to do some more looking tomorrow.
>
> ___cliff rayman___ wrote:
>
> > i had the same problem - i was able to fix it by performing
> > the following patches.  not sure how it is supposed to work
> > without the patches. so, either something is wrong with our
> > two configurations or something is wrong with 1.26.  usually
> > i'd believe the former, but 1.26 has only been out for 2 weeks
> > or so.
> > -----------snip----------
> > --- ./t/internal/hooks.t.orig   Wed Jan 20 15:16:38 1999
> > +++ ./t/internal/hooks.t        Mon Aug 20 20:52:03 2001
> > @@ -7,6 +7,7 @@
> >  use ExtUtils::testlib;
> >  BEGIN { require "net/config.pl"; }
> >  require LWP::UserAgent;
> > +use URI::URL;
> >
> >  #first one queries httpd for enabled hooks,
> >  #generating a hook::handler() for each and writing t/docs/.htaccess
> >
> > --- ./t/TEST.orig       Sun Mar  5 15:36:08 2000
> > +++ ./t/TEST    Mon Aug 20 20:56:20 2001
> > @@ -2,7 +2,7 @@
> >
> >  $|++;
> >  use Config;
> > -
> > +use URI::URL;
> >  # First we check if we already are within the "t" directory
> >  if (-d "t") {
> >      # try to move into test directory
> >
> > [root@u5 mod_perl-1.26]# diff -u ./blib/lib/Apache/test.pm.orig 
>./blib/lib/Apache/test.pm
> > --- ./blib/lib/Apache/test.pm.orig      Wed Feb 14 14:57:08 2001
> > +++ ./blib/lib/Apache/test.pm   Mon Aug 20 20:49:06 2001
> > @@ -5,6 +5,8 @@
> >  use Exporter ();
> >  use Config;
> >  use FileHandle ();
> > +use URI::URL;
> > +
> >  *import = \&Exporter::import;
> >
> >  @EXPORT = qw(test fetch simple_fetch have_module skip_test
> > ----------snip----------
> >
> > allan wrote:
> >
> > > running make test i cannot come aroubf this annoying message:
> > >
> > > will write error_log to: t/logs/error_log
> > > letting apache warm up...\c
> > > done
> > > /usr/bin/perl t/TEST 0
> > > Can't locate object method "new" via package "URI::URL" at
> > > ../blib/lib/Apache/test.pm line 252.
> > > make: *** [run_tests] Error 255
> > >
> > >
> >
> > --
> > ___cliff [EMAIL PROTECTED]http://www.genwax.com/
>
> --
> ___cliff [EMAIL PROTECTED]http://www.genwax.com/

--
___cliff [EMAIL PROTECTED]http://www.genwax.com/


Reply via email to