# force parsing as a block
%hash = map { +"$_", 2 } @l;
%hash = map { ; "$_", 2 } @l;
%hash = map { ( "$_", 2) } @l;

# force parsing as an anonymous hash
@hash_refs = map +{ $_, 2 }, @l;