Plausibly useful, sure put it on CPAN. You could cut a lot of that code by basing your code on Tie::StdHash.

-sam