#!/usr/bin/perl -w

print "Five is more than six? ",      5 >  6, "\n";
print "Seven is less than sixteen? ", 7 < 16, "\n";
print "One is more than one? ",       1 >  1, "\n";