You have been given several suggestions of correction. We don't know what you have implemented and what not. Please show us the full code so that we know what you have now. Or show the output of a Data::Dumper dump command. Better yet, show us both.