perl -e '@a = map {k => $_} (1..3)'
syntax error at -e line 1, near "}("