Hi iam trying to run the below run script in CMD prompt. Its not doing anything instead it rermains blank in cmd prompt itself pls give me a solution. $proxy->start()- Problem occurs at this point.

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

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

    # create a new HTTP::Recorder object
    my $agent = new HTTP::Recorder;

    # set the log file (optional)
    $agent->file("/tmp/myfile");

    # set HTTP::Recorder as the agent for the proxy
    $proxy->agent( $agent );
$proxy->start();
1;
[download]

20080423 Janitored by Corion: Added formatting, code tags, as per Writeup Formatting Tips