Worm operators don't work in Perl, apparently:
$ perl -E 'say int(-int(~(int(13))))'-1.84467440737096e+19
#ShaiHulud #Chrysknife
muddle