perl Net-Netmask