Nope, it's bitwise negation and doesn't work this way. It's basically - noop. Keeps value the same.

The point of Double Negation is casting [...] any false value to 0.

Nope, it's bitwise negation and doesn't work this way. It's basically - noop. Keeps value the same.

Um:

 % say "(!1)"

 % say "~~(!1)"
0
[download]

So it could be an idiom that is applied to all Boolean values (so that Boolean false shows up as '0' instead of as the "invisible" ''). It just does nothing when the Boolean value is already 1.

- tye        

Interestingly, !1 is "", ~~(!1) is 0, but ~~("") is "".

$ perl -MO=Deparse -E'say !1; say ~~(!1); say ~~("");'
use feature 'current_sub', 'evalbytes', 'fc', 'say', 'state', 'switch'
+, 'unicode_strings', 'unicode_eval';
say !1;
say 0;
say '';
-e syntax OK
[download]

Right you are. Then... maybe chromatic can enlighten us?

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

You're right, but, still, ~~1 will return 1, i.e a true value. Why the author of the module did that, I have no idea.