Select Code to Download

use Net::Pcap;

my $err;
...
}

print "address=$address netmask=$netmask\n";

dev is eth0
address=-1062731776 netmask=-256