Perl xor returns unexpected result

Viewed 386

What's going on here? Why isn't $c == 1 ?

$ cat y.pl
#!/usr/bin/perl
$a = 0;
$b = 1;
$c = $a xor $b;
print "$a ^ $b = $c\n";

$ ./y.pl 
0 ^ 1 = 0
2 Answers
Related