using Hash::Case and Storable

[Andrew Gaffney]

I'm using the Storable module to save and load a hash tree. I also want to use the 
Hash::Case::Lower module to make my hash case insensitive. I can't figure out how to tie a 
hashref to the Hash::Case::Lower module and load data into it with Storable. I tried 
something like:

use Hash::Case::Lower;
use Storable;
tie my(%realhash), 'Hash::Case::Lower';
my $hashref = \%realhash;
$hashref = retrieve('somefile');
This causes $hashref to be assigned to the anonymous hash returned from retrieve() so that 
it no longer points to the tied hash. It is then no longer case insensitive. How can I 
make this work?

--
Andrew Gaffney
Network Administrator
Skyline Aeronautics, LLC.
636-357-1548
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>