if ($string1 ne $string2) { print "\$string1 is not equal to \$string2\n"; }