return {map {$_ => 1} qw /a b c/}
[download]

Or did I understand your questing wrong?

Abigail