exo : blah

content

Mon, 31 Aug 2009

bad test data

use Test::More tests => 1;

my $discount = 50;
my $cost = 10;

my $discounted_cost = $cost * ( $discount / 100 );

is( $discounted_cost, 5, "discount correctly applied" );

posted at: 21:57 #

all the usual copyright stuff... [ copyright struan donald 2002 - 2012 ], plus license