NAME
Net::CIDR::Lookup::Tie
DESCRIPTION
This is a Tie::Hash interface to Net::CIDR::Lookup, see there for details.
The tied hash accepts net blocks as keys in the same syntax as Net::CIDR::Lookup::add()/add_range() and stores arbitrary scalar values under these. The same coalescing as in Net::CIDR::Lookup takes place, so if you add any number of different keys you might end up with a hash containing less keys if any mergers took place.
SYNOPSIS
use Net::CIDR::Lookup::Tie;
tie my %t, 'Net::CIDR::Lookup::Tie';
$t{'192.168.42.0/24'} = 1; # Add first network
$t{'192.168.43.0/24'} = 1; # Automatic coalescing to a /23
$t{'192.168.41.0/24'} = 2; # Stays separate due to different value
print $t{'192.168.42.100'}; # prints "1"
foreach(keys %h) { ... } # Do anything you'd do with a regular hashMETHODS
STORE
Stores a value under a given key
FETCH
Fetches the value stored under a given key
FIRSTKEY
Gets the first key in the hash. Used for iteration with each()
NEXTKEY
Gets the next key from the hash. Used for iteration with each()
EXISTS
Tests if a key is in the hash. Also returns true for blocks or addresses contained within a block that was actually stored.
DELETE
Delete a key from the hash. Note that the same restrictions as for Net::CIDR::Lookup regarding netblock splitting apply!
CLEAR
Deletes all keys and their values.
SCALAR
Returns the number of keys in the hash
_updkeys
Private method to update the internal key cache used for iteration