perl -MSymbol -e "print ${gensym()} for 1 .. 10"