$a = true;

$b = false;

​

print "Value of \$a = $a and value of \$b = $b\n";

​

$c = ($a and $b);

print "Value of \$a and \$b = $c\n";

​

$c = ($a  && $b);

print "Value of \$a && \$b = $c\n";

​

$c = ($a or $b);

print "Value of \$a or \$b = $c\n";

​

$c = ($a || $b);

print "Value of \$a || \$b = $c\n";

​

$a = 0;

$c = not($a);

print "Value of not(\$a)= $c\n";

​