Powered by Ajaxy
Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset

Perl: bitwise logical operators

#!/usr/bin/perl -w
$number = 42 & 18;       # AND Operator
print "1:# $number";   
$number = 42 | 18;       # OR  Operator
print "2:# $number";  
$nu