Problem with a tiny little script - attempt 2

"Rui Fernandes" <[email protected]> Sat, 26 Mar 2005 09:38:20 -0000
Newsgroups gmane.linux.debian.devel.portuguese,gmane.linux.debian.knoppix
Message-ID <00b801c531e7$8f174340$0b276652@rui>
(the last email was all messed up...)

Hi,

I've downloaded the Module HTTP::CheckUser from CPAN, and try to use it, at
first, the way that is in the example. I received the following error
message:

>>Can't locate object method "init_header" via package "HTTP::Headers" at
C:/Perl/lib/HTTP/Message.pm line 172.

The code I made is like this:
#!/usr/bin/perl use CGI::Carp qw(fatalsToBrowser);use CGI qw(escape);use
LWP::Simple;use HTTP::CheckProxy;print "Content-type: text/html\n\n";$ip
="148.240.241.67";my $open_proxy_test = HTTP::CheckProxy->new($ip);print
"proxy test for $ip returns ".$open_proxy_test->code."\n";print
($open_proxy_test->guilty? "guilty" : "innocent"); What can be wrong? Kind
regards, Rui Miguel FernandesPorto - Portugal