Re^12: WWW-Search module that works

so far

  DB<1> n
main::(ysam5a.pl:10):   my $sQuery = 'Columbus Ohio sushi restaurant';
  DB<1> n
main::(ysam5a.pl:11):   my $oSearch = new WWW::Search('AltaVista');
  DB<1> x $sQuery
0  'Columbus Ohio sushi restaurant'
  DB<2> n
main::(ysam5a.pl:13):   $oSearch->native_query(WWW::Search::escape_que
+ry($sQuer
));
  DB<2> x my $oSearch
0  undef
  DB<3> n
main::(ysam5a.pl:14):   $oSearch->login($sUser, $sPassword);
  DB<3> n
main::(ysam5a.pl:16):   while (my $oResult = $oSearch->next_result())
main::(ysam5a.pl:17):   {
  DB<3> n
main::(ysam5a.pl:20):   $oSearch->logout;
  DB<3> x my $oResult
0  undef
  DB<4> n
Debugged program terminated.  Use q to quit or R to restart,
  use O inhibit_exit to avoid stopping after program termination,
  h q, h R or h O to get additional info.
[download]

Comment on Re^12: WWW-Search module that works Download Code

Replies are listed 'Best First'.
Re^13: WWW-Search module that works by menolly (Hermit) on Jun 15, 2007 at 17:45 UTC
OK, so it looks like your object isn't getting created -- after the 'new', it's still undefined. Do you have WWW::Search::Yahoo installed? How about WWW::SearchResult?	[reply]
Re^14: WWW-Search module that works by coder57 (Novice) on Jun 16, 2007 at 06:40 UTC
I have WWW::Search installed but not WWW::SearchResult I am on activeperl 5.8.6 which repository has it?	[reply]
Re^15: WWW-Search module that works by marto (Cardinal) on Jun 16, 2007 at 10:09 UTC
Perhaps you should take a look at PPM::Repositories, as detailed in A guide to installing modules for Win32. Alternatively check out http://win32.perl.org/ for Camel Pack or Strawberry Perl which come with a C compiler and make for building Cpan modules. Update: Added like to http://win32.perl.org/ etc Martin	[reply]
Re^16: WWW-Search module that works by coder57 (Novice) on Jun 16, 2007 at 15:19 UTC
Re^15: WWW-Search module that works by menolly (Hermit) on Jun 18, 2007 at 21:56 UTC
What does the debugger show after you call new? Are you calling new with Yahoo, or with another search engine? If it's another engine, do you have the specific WWW::Search backend for that engine installed?	[reply]
Re^13: WWW-Search module that works by quester (Vicar) on Jun 17, 2007 at 06:02 UTC
When you say "x my $oResult" it means to create a NEW variable, local to just that one debugging command, and display its value, which is of course undefined. If you just say "x $oResult" it will display the correct value. Incidentally, I just ran your program under perl 5.8.8 on a Linux box, installing WWW::Search::AltaVista (and Yahoo as well) from CPAN. It works fine for me. You might have run into a Windows (or ActivePerl) compatibility issue. Sometimes it helps to use the version of Perl that runs under Cygwin .	[reply]