Reference found where even-sized list expected at perl.pl line 9. Use of uninitialized value $hash{"HASH(0x98bf7ec)"} in concatenation (.) or string at perl.pl line 12. HASH(0x98bf7ec) :