Select Code to Download

sub new_from_string {
    my $class = shift;
...
        %p,
    );
}

#!c:/apps/strawberry/perl/bin/perl.exe
use strict;
...
for(qw/as_string as_integer as_binary as_bit_string version mask_lengt
+h/){
  print $_,": ",$ip->$_(),"\n";
}

Socket::inet_pton not implemented on this architecture at C:/apps/stra
+wberry/perl/site/lib/Net/Works/Util.pm line 42.