#!/usr/local/bin/perl

use Test::More;

print "4 - 2 = " , ( 4 - 2 ) . "\n";

cmp_ok ( 4 - 2 , '==', 2, "maths works" );

print "\n";

print "-2.3 - -0.6 = " . ( -2.3 - -0.6 ) ."\n";

cmp_ok ( -2.3 - -0.6 , '==', -1.7, "maths works" );

done_testing();