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