my $cidrDB : shared;
my $cidrLock:shared; 

$cidrDB = Net::CIDR::Lite->new;