Dear my friends...
I use opensuse10.2. I installed 'WWW::Search::Google' with cpan.
I tried a simple code like this:
====
#!/usr/bin/perl -w
use WWW::Search::Google;
$key="ABQIAAAASzVWEo9_PkDjwjTkhPHJIxTovFWtVmuuMSRYt_dv3iXA1zQ3OxT9hxr3F7hqD-SZIzQb7p0QjzUobQ";
my $search = WWW::Search->new('Google', key => $key);
$search->native_query("Business Education");
while (my $result = $search->next_result()) {
print $result->title, "\n";
print $result->url, "\n";
print $result->description, "\n";
print "\n";
}
====
But as I run this code I get an error message as the output like this:
./googleku.pl
Use of uninitialized value in concatenation (.) or string at
/usr/lib/perl5/site_perl/5.8.8/Net/Google/Service.pm line 80.
Service description 'file:' can't be loaded: 404 File `' does not exist
===
I found this threath as my googling result:
http://johnbokma.com/mexit/2005/12/21/net-google-bug.html
I did the as it told me but it did not make any change.
===
Net::Google fix: copy the wsdl file
The fix is an easy one. Somehow the build process doesn't copy the
GoogleSearch.wsdl and the directory Services that contains this file to the
blib directory. So copying manually the Services directory from:
Net-Google-1.0/lib/Net/Google
to the following directory:
Net-Google-1.0/blib/lib/Net/Google
fixed the problem for me. Entering nmake tests reported no more problems, and
nmake install made the programs I have that require Net-Google work again.
===
Please tell me if somebody has ever found the same problem.
Please tell me my mistake.
Thank you very much.
--
Patrik Hasibuan <[EMAIL PROTECTED]>
Junior Programmer
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
