#!perl
use strict; use warnings;
use Calculator::MortgagePayment;
use Test::More tests => 1;
my $calculator = Calculator::MortgagePayment->new(100000, 5, 240);;
is(411, $calculator->interestOnly());
#!perl
use strict; use warnings;
use Calculator::MortgagePayment;
use Test::More tests => 1;
my $calculator = Calculator::MortgagePayment->new(100000, 5, 240);;
is(411, $calculator->interestOnly());