Select Code to Download

#!/usr/bin/perl -l

...

push @_, $_ xor print $_ for 'a' .. 'b';
print @_;

Useless use of logical xor in void context at ./perlmonks_xor_vs_or_an
+d.pl line 6.
a
b
ab

#!/usr/bin/perl -l

...
    ( 2 or 3 ),
    ( 2 xor 3 ),
    ;

[3]
[2]
[]