There are thousands and thousands of IP numbers in the private ranges (i.e. 10.*.*.*). Take such an IP number, use it next to your normal address, adjust your routing table, and there you go.

Repeat when necessary.

Of course, this has nothing to do with Perl.

Abigail