note
tcf22
You need to create a Net::IP object. Try this
<CODE>
#!/usr/local/bin/perl
use strict;
use Net::IP;
my $ip = new Net::IP('193.0.1/24') or die (Net::IP::Error());
print ("Mask : ", $ip->mask());
</CODE>
PS. using strict would have prevented this error.
<BR><BR>
Update: Added IP in constructor. Directly from CPAN.
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-62377">
<P>- Tom</P>
</div></div>
372541
372541