Acme::MetaSyntactic 

• Now with a simple one-liner ...

perl -MAcme::MetaSyntactic -le 'print join ", ", metaname(5)'

• You get 5 unique and intriguing variable names

corge, fred, quux, plugh, garply