#!/usr/local/bin/perl -w
use strict;

print "Some math:\n";
print "3 + 7 = ", 3 + 7, "\n";
print "3 X 7 = ", 3 * 7, "\n";
print "7 / 3 = ", 7 / 3, "\n";

# round it up at >= 0.5, down at < 0.5 
my $result = 7 / 3;
print "Let's round that off to an integer: ", int ($result + 0.5), "\n";

