$ perl -wE 'say keys [1, 2]'
01
$ perl -wE 'say keys { a => 1, b => 2 }'
ab