Select Code to Download

#!/usr/bin/perl
use warnings;
...
        print $result2;
        print "\n";
}

C:\Code>perl masktest.pl
ip addr = 01001000000111110100111100000101
...
notmask = 00000000000000000000000011111111
01001000000111110100111100000000
01001000000111110100111111111111