Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl

...

print "Start ip [" . $ip->ip . "]\n";
print "start mask [" . $ip->prefixlen . "]\n";

Select or download this

 % ./t2.pl
Start ip [192.168.0.0]
start mask [24]
Can't call method "ip" on an undefined value at ./t2.pl line 15.