perlquestion
boerni
Hey Monks
I never realized perl behaves like this. There is a difference between (! 'a' eq 'b') and ('a' ne 'b').
<code>
#!perl
use strict;
use warnings;
use Data::Dumper;
my $s1 = 'bla';
my $s2 = 'blu';
my $r = $s1 eq $s2;
print Dumper $r;
if (! $s1 eq $s2) {
print "$s1 and $s2 are not the same\n";
}
else {
print "$s1 and $s2 are the same\n";
}
exit 0;
</code>
prints:
<code>
$VAR1 = '';
bla and blu are the same
</code>
<p>The "correct" ($s1 ne $s2) works as expected. But why does (! $s1 eq $s2) not work?</p>
<p>Probably there is a simple explanation but I don't know it... Maybe one of you Monks can explain this.</p>
<p>Thank you</p>