#!/usr/bin/perl
print "Content-type: text/html\n\n"; 
$a=2;
$b=4;
if($a < $b) { print "$a is less then $b\n"; }
else { print "$b is less then $a\n"; }
exit();