#!/usr/local/bin/perl -w $i = 10; if ($i < 0){ print "i is less than 0\n"; } elsif ($i < 10) { print "i is less than 10\n"; } else { print "i is greater than or equal to 10\n"; } unless ($i > 5){ print "i is not greater than 5\n"; } else { print "i is, in fact, greater than 5\n"; }