I need to save info with a fast way in Perl and to be able to read this info fast too... For example the below loop seems in simplified way what i want to improve.. I have three values in each loop time to save and by using a hash of hash it takes 15 secs..
my %save;
for(0 .. 2000000)
{
$save{$_}{$_+1}=$_+2;
}