Select Code to Download

c:\test>perl -MO=Deparse
use 5.10.0;
...
print "a not double matches b\n" if not $a =~ ~~~$b;
- syntax OK