Help for this page

Select Code to Download

Select or download this

perl -e 'use bytes;$s1="abcd";$s2="abcz";$dif=$cmp=$s1 cmp $s2;print "
+$dif\t$cmp\n";'

Select or download this
```
 3     -1
```