Lines Matching refs:_debug

105 $self->{_debug} = 1;   # PvB
132 if ($self->{_debug})
151 print STDERR " * AltaVista::Intranet::native_retrieve_some()\n" if $self->{_debug};
160 print STDERR " * sending request (",$self->{_next_url},")\n" if $self->{_debug};
169 print STDERR " * got response, start parsing\n" if $self->{_debug};
182 print "No of Pages Line --$_--\n" if 2 <= $self->{_debug}; # 1st parsing check: No of Pages
185 print STDERR "found web pages count line\n" if 2 <= $self->{_debug};
187 print "No of pages found: $1\n\n" if $self->{_debug}; # PvB
192 print "No of words Line --$_--\n" if 2 <= $self->{_debug}; # 2nd parsing check: No of Words
195 print STDERR "count line\n" if 2 <= $self->{_debug};
205 print "title line: --$_--\n" if 2 <= $self->{_debug}; # 4nd parsing check: title
209 print STDERR "title line\n" if 2 <= $self->{_debug};
216 print "Hit found: $1\n" if $self->{_debug};
224 print "Title of page found: ", $sTitle, "\n" if $self->{_debug};
231 print "Title of page found: ", $sTitle, "\n" if $self->{_debug};
242 print STDERR "description line\n" if 2 <= $self->{_debug};
243 print STDERR "description: --$_-- \n" if 2 <= $self->{_debug};
246 print "Description of page found: ", $_, "\n" if $self->{_debug};
253 print STDERR "relevance/date/size line\n" if 2 <= $self->{_debug};
257 print STDERR "last modified date: $_ \n" if $self->{_debug};
262 print STDERR "relevance: $_ \n" if $self->{_debug};
271 print STDERR "size: $iSize \n\n" if $self->{_debug};
279 print STDERR "next link line\n" if 2 <= $self->{_debug};
284 print STDERR "next link url is: $_ \n" if $self->{_debug};
289 print " * end of parsing reached\n" if $self->{_debug};
294 print STDERR "didn't match\n" if 2 <= $self->{_debug};
303 print " * hits found: \n" if $self->{_debug};