Help for this page

Select Code to Download

Select or download this
```
$x ^ $x
```

Select or download this

% perl -Mutf8 -e '$x = 42; if ($x ^ $x) {print "string\n";}'
% perl -Mutf8 -e '$x = 42.24; if ($x ^ $x) {print "string\n";}'
...
% perl -v

This is perl 5, version 24, subversion 1 (v5.24.1) built for amd64-fre
+ebsd-thread-multi