$ perl -we'%hoh = { foo => 1 };'
Reference found where even-sized list expected at -e line 1.