my $acl_block=new2 Net::Netmask ("$b");