$ perl -w -e 'my %hash = { one => 1}'
Reference found where even-sized list expected at -e line 1.
$