Short-circuit operators
#!/usr/bin/perl
$num1=50;
$num2=100;
$num3=0;
print $num1 && $num3, "\n";
print $num3 && $num1, "\n";
print $num1 && $num2, "\n";
print $num2 && $num1, "\n\n";
print $num1 || $num3, "\n";
print $num3 || $num1, "\n";
print $num1 || $num2, "\n";
print $num2 || $num1, "\n";
Related examples in the same category