Skip Menu |
 

This queue is for tickets about the HTTP-Recorder CPAN distribution.

Report information
The Basics
Id: 16699
Status: resolved
Priority: 0/
Queue: HTTP-Recorder

People
Owner: Nobody in particular
Requestors: liransgarage [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Date: Fri, 23 Dec 2005 14:01:24 +0200
From: liran tal <liransgarage [...] gmail.com>
To: bug-HTTP-Recorder [...] rt.cpan.org
Subject: HTTP::Recorder can't go passed java as it seems
Download (untitled) / with headers
text/plain 3.1k
Hey guys, I'm using the cpan version - HTTP::Recorder 0.05 with the following code: #!/usr/bin/perl use HTTP::Proxy; use HTTP::Recorder; use URI::QueryParam; # we're adding this to enable login pages as according # solutions at: http://www.spanner.org/lists/osxperl/2005/08/22/905b481c.html my $proxy = HTTP::Proxy->new(); # create a new HTTP::Recorder object my $agent = new HTTP::Recorder; # set the log file (optional) $agent->file("/tmp/proxy"); # set HTTP::Recorder as the agent for the proxy $proxy->agent( $agent ); # start the proxy $proxy->start(); 1; when I try to login to a website which is (i assume) java enabled, HTTP::Recorder stumbles upon some errors or missing some libraries maybe. Here's the output: Use of uninitialized value in substitution (s///) at /usr/local/share/perl/5.8.4/HTTP/Recorder/Logger.pm line 171. Use of uninitialized value in concatenation (.) or string at /usr/local/share/perl/5.8.4/HTTP/Recorder/Logger.pm line 173. Can't locate object method "query_param" via package "rec-action=submitform&rec-formname=p&rec-formnumber=1&rec-form1-unknown-userName=1&userName=colloron&rec-form1-password-password=1&password=t040682&rec-form1-unknown-language=1&language=&rec-form1-image-refresh=1&refresh.x=113&refresh.y=9" (perhaps you forgot to load "rec-action=submitform&rec-formname=p&rec-formnumber=1&rec-form1-unknown-userName=1&userName=colloron&rec-form1-password-password=1&password=t040682&rec-form1-unknown-language=1&language=&rec-form1-image-refresh=1&refresh.x=113&refresh.y=9"?) at /usr/local/share/perl/5.8.4/HTTP/Recorder.pm line 347. Use of uninitialized value in substitution (s///) at /usr/local/share/perl/5.8.4/HTTP/Recorder/Logger.pm line 171. Use of uninitialized value in concatenation (.) or string at /usr/local/share/perl/5.8.4/HTTP/Recorder/Logger.pm line 173. Can't locate object method "query_param" via package "rec-action=submitform&rec-formname=p&rec-formnumber=1&rec-form1-unknown-userName=1&userName=colloron&rec-form1-password-password=1&password=t040682&rec-form1-unknown-language=1&language=&rec-form1-image-refresh=1&refresh.x=113&refresh.y=9" (perhaps you forgot to load "rec-action=submitform&rec-formname=p&rec-formnumber=1&rec-form1-unknown-userName=1&userName=colloron&rec-form1-password-password=1&password=t040682&rec-form1-unknown-language=1&language=&rec-form1-image-refresh=1&refresh.x=113&refresh.y=9"?) at /usr/local/share/perl/5.8.4/HTTP/Recorder.pm line 347. Use of uninitialized value in substitution (s///) at /usr/local/share/perl/5.8.4/HTTP/Recorder/Logger.pm line 171. While the appending to the log file seems just fine, but it won't go passed it: liran@octave:~/Programming/perls$ tail -f /tmp/proxy $agent->get('http://www.example.net/'); $agent->get('http://www.example.net/index.html'); $agent->form_name('p'); $agent->field('password', '123123'); $agent->field('language', ''); $agent->field('userName', 'test'); $agent->click(); $agent->form_name('p'); $agent->field('password', '123123'); $agent->field('language', ''); $agent->field('userName', 'test'); $agent->click(); Any comment is welcome. thanks.
Fixed. - Shmuel


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.