Net::ProxyMod

[Harald Wopenka]

Hi there!

I wanted to watch the communication between browser and server and found
that nice ProxyMod-Module. But for some reason it doesnt work.

This is the code:

  use Net::ProxyMod;

  $p = Net::ProxyMod->new("172.16.3.1", 8080, "", 0, 1);
  $p->get_conn(\&infunc,\&outfunc);

  sub infunc
  {
    my($data) = @_;
    print "IN: '$data'\n";
    return($data);
  }

  sub outfunc
  {
    my($data) = @_;
    print "OUT: '$data'\n";
    return($data);
  }

And this is the output:

  C:\temp>proxytest.pl
  Started server at 172.16.3.1:8080
  Connect from 172.16.3.1:1357
  Connecting to 172.16.3.1:8080
  Connect from 172.16.3.1:1358
  Connecting to 172.16.3.1:8080
  Connect from 172.16.3.1:1359
  Connecting to 172.16.3.1:8080

There is nothing else - the browser times out after a while. It doesnt
matter which IP I use for the proxy (172.16.3.1, 127.0.0.1, localhost) - its
always the same :(

Does anyone have any idea what could be wrong?

Harry

_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs