|
Posted by banjolibrarian on August 9, 2006, 9:29 pm
Please log in for more thread options
Using the fscript below on Activestate Perl (Windows XP) with
WWW::Search::Ebay installed, I get no results when it comes to printing
the items. It prints the $oSearch and $sQuery values along the way,
but does not generate anything from within the while loop. Any advice
would be appreciated.
Thanks!
Jesse
<script below>
#!/bin/env perl
#!c:\perl\bin\perl.exe
use WWW::Search;
my $oSearch = new WWW::Search('Ebay');
print "oSearch: ",$oSearch,"\n";
my $sQuery = WWW::Search::escape_query("dog");
print "sQuery: ",$sQuery,"\n";
$oSearch->native_query($sQuery);
print "oSearch: ",$oSearch,"\n";
while (my $oResult = $oSearch->next_result())
{
print "oResult: ",$oResult,"\n";
print $oResult->title, "\n";
print $oResult->url, "\n";
}
end;
|