Help for this page
#!/usr/bin/perl -w ... undef $db; untie $hash;
$hash{a_key} = { b_key => 2 }; $hash{a_key}{b_key} = 3;