Thanks guys!
Yeah, this is going to get too complicated to be worth it. I'm going to store what i need in XML, which is what i should be doing anyway.

Interesting note, trying things from earlier responses, i tried running this:

use strict;
use warnings;
use Tie::IxHash;
use Data::Dumper;

{
    my $blah = tie( %{{ 'a' => 1 }}, 'Tie::IxHash');

    print Dumper($blah);
}
[download]

And the resulting output was:

$VAR1 = bless( [
                 {},
                 [],
                 [],
                 0
               ], 'Tie::IxHash' );
[download]

Which is not what i expected, but oh well, im not using this anyway.