$ echo -e 'foo\n' | perl -e'print sort{*a=$b,0} <>'
*** glibc detected *** malloc(): memory corruption: 0x0812dcdc ***
Aborted