Sorry, doesn’t seem to work for me:
12:00 >perl -e "print sort {4-rand 9} split //, HnlcrhJsre_Pt_aeAeuot_ +kr if srand JAPH;" Integer overflow in srand at -e line 1. _nhoeuJAHl_ktscPrt_rreea 12:00 >perl -v This is perl 5, version 18, subversion 1 (v5.18.1) built for MSWin32-x +86-multi-thread-64int ...
:-(
| Athanasius <°(((>< contra mundum | Iustus alius egestas vitae, eros Piratica, |
In reply to Re: Slightly Srandom JAPH
by Athanasius
in thread Slightly Srandom JAPH
by BenGoldberg
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |