Create a gist now

Instantly share code, notes, and snippets.

Embed
isobel:~ adam$ perl -le 'print join "", reverse sort split //, "everything"' | perl -le 'print $_ x (ord($_) - ord('a')+1) for split //, <>'
yyyyyyyyyyyyyyyyyyyyyyyyy
vvvvvvvvvvvvvvvvvvvvvv
tttttttttttttttttttt
rrrrrrrrrrrrrrrrrr
nnnnnnnnnnnnnn
iiiiiiiii
hhhhhhhh
ggggggg
eeeee
eeeee
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment