Re: Facing problems in setting up http recorder for web tesing

See Re: problem with http::recorder for a script that will get you going. HTTP::Recorder is still experimental, at least for me. I wouldn't use it for production or serious testing.

As of version 0.05, there is no control panel. You'll have to use an earlier version if you want that. Also, there are a number of prereqs that must be installed before you can use http-recorder. See: HTTP::Proxy

Comment on Re: Facing problems in setting up http recorder for web tesing

Replies are listed 'Best First'.
Re^2: Facing problems in setting up http recorder for web tesing by rajeshT (Initiate) on May 25, 2007 at 09:54 UTC
Hi, Thanks for your inputs. file myproxy.pl `use strict; use warnings; use HTTP::Proxy; use HTTP::Recorder; my $proxy = HTTP::Proxy->new( port => 3128 ); my $agent = new HTTP::Recorder; #Try C:\Desktop\Agent\log $agent->file("/home/Desktop/Agent/log"); $proxy->agent( $agent ); $agent->control(["http://127.0.0.1"]); $proxy->start(); 1;` [download] I have run the modified myproxy.pl file which was given. But,still i am getting the same error. So i thought problem with my installation and installed entire configurarion in another system. Installed ActivePerl-5.8.8.817-MSWin32-x86-257965.msi in another system and installed the following ppds. ppm install http://theoryx5.uwinnipeg.ca/ppms/HTTP-Request-Params.ppd ppm install http://theoryx5.uwinnipeg.ca/ppms/Email-MIME-Modifier.ppd ppm install http://theoryx5.uwinnipeg.ca/ppms/HTTP-Recorder.ppd ppm install http://theoryx5.uwinnipeg.ca/ppms/HTTP-Proxy.ppd after ran the myproxy.pl , i got the same error here also. The following error shown: D:\perl programs>myproxy.pl Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/ +Email/MIME.pm line 90. Can't locate object method "query_param" via package "YMSG" (perhaps y +ou forgot to load "YMSG"?) at C:/Perl/site/lib/HTTP/Recorder.pm line +347. [download] Can anybody suggest to rectify this.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Facing problems in setting up http recorder for web tesing
by rajeshT (Initiate) on May 25, 2007 at 09:54 UTC

myproxy.pl

use strict;
use warnings;

use HTTP::Proxy;
use HTTP::Recorder;

my $proxy = HTTP::Proxy->new( port => 3128 );

my $agent = new HTTP::Recorder;

#Try C:\Desktop\Agent\log
$agent->file("/home/Desktop/Agent/log");

$proxy->agent( $agent );

$agent->control(["http://127.0.0.1"]);

$proxy->start();

1;
[download]

myproxy.pl

D:\perl programs>myproxy.pl

Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Use of uninitialized value in pattern match (m//) at C:/Perl/site/lib/
+Email/MIME.pm line 90.
Can't locate object method "query_param" via package "YMSG" (perhaps y
+ou forgot to load "YMSG"?) at C:/Perl/site/lib/HTTP/Recorder.pm line 
+347.
[download]

[reply]
[d/l]
[select]