Does anybody know of a way of using perl to display the ipaddresses of multiple network cards on one machine. I am trying to test client machines to see if they are dialup users. The way I am trying to do this is to check if their IPaddress is in the range specified for dialup. Currently I am using 
use Socket; 
use Sys::Hostname; 
my $host = hostname(); 
my $addr = inet_ntoa(scalar(gethostbyname($name)) || 'localhost');

[download]
which works fine on machines with only a modem. I falls down when the client has a NIC in the macine as well. For example, if you have an address of 192.168.1.1 on your network card and an address on your modem of 10.1.0.1 then you are considered to be a local user as $addr returns 192.168.1.1 rather than 10.1.0.1. Because the clients are multiple versions of windows can’t use ipconfig and regex. If anyone can help that would be great.

Edit Masem 2001-11-27 - Code tags

In reply to Multiple IP Addresses by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.