my @a = map +{ $_ => ord($_) }, @arr; ^ | force a hash