my %allIPs; dbmopen( %allIPs, "/full/path/to/database/allIPs", 0666 ) or die "Cannot open allIPs database: $!"; $allIPs{$userIP} = $dbEntry or die "$!"; dbmclose %allIPs;