Webmaster Forum / Perl / General Perl Topics / September 2003

What exactly do you mean "bind to a specific IP address"?

xoa

There's a variable

@LWP::Protocol::http::EXTRA_SOCK_OPTS

that gets passed to IO::Socket::INET::new

In theory, setting it to (LocalAddr => "myipaddress")
should do the trick.

I haven't tried it though.

-----Original Message-----
From: David Busby [mailto:busby@pnts.com]
Sent: Tuesday, September 30, 2003 6:10 PM
To: libwww@perl.org
Subject: Bind to specific IP

List,
   How can I make LWP::UserAgent bind to a specific IP address?  I cannot
find in archives or with google.

David Busby
Systems Engineer
busby@pnts.com

That has to do with the order in which the compiler sees the variables.

It's used deep in the heart of LWP, which isn't loaded until it's needed,
so the Perl compiler doesn't know about it yet.

Does it work, though?

-----Original Message-----
From: David Busby [mailto:busby@pnts.com]
Sent: Tuesday, September 30, 2003 6:29 PM
To: libwww@perl.org
Subject: Re: Bind to specific IP

List,
   Ok I got this in:

@LWP::Protocol::http::EXTRA_SOCK_OPTS = (LocalAddr => "66.236.xx.yy");
my $ua = LWP::UserAgent->new( \
 agent=>'Mozilla/4.0', \
 timeout=>10) or die($!);

But I get this:
Name "LWP::Protocol::http::EXTRA_SOCK_OPTS" used only once: possible typo
at
.../thing.pl line 28.

Google says this is cause I only write the option, never read in my script.
This is caused by #!/usr/bin/perl -w

That seems odd, shouldn't the read in LWP somewhere fix it?

/B

----- Original Message -----
From: "David Busby" <busby@pnts.com>
To: "Andy Lester" <andy@petdance.com>
Cc: <libwww@perl.org>
Sent: Tuesday, September 30, 2003 15:21
Subject: Re: Bind to specific IP

not