#!/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";