Re: Test::More how come?

Generally STDOUT does not show up with make test

You can use diag or print STDERR :

#!/usr/local/bin/perl

use Test::More;

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

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

print STDERR "\n";

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

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

done_testing();
[download]

Comment on Re: Test::More how come? Select or Download Code

Replies are listed 'Best First'.
Re^2: Test::More how come? by sem999 (Initiate) on Jan 30, 2013 at 17:13 UTC
Sure, but don't you think the second test should PASS? have i made some really simple mistake but just can't see it??	[reply]
Re^3: Test::More how come? by keszler (Priest) on Jan 30, 2013 at 17:24 UTC
Try: `perl -e 'printf "%.32g\n", -2.3 - -0.6;' -1.6999999999999997` [download] See for other examples Perl 5.8.x floating point representation error, RFC: Large Floating Point Numbers - Rounding Errors, etc.	[reply] [d/l]
Re^3: Test::More how come? by thmsdrew (Scribe) on Jan 30, 2013 at 17:26 UTC
It'll work if you use `eq` instead of `==`.	[reply] [d/l] [select]
Re^4: Test::More how come? by sem999 (Initiate) on Jan 30, 2013 at 17:44 UTC
I get it - it's an FP precision thing. Thanks.	[reply]
Re^3: Test::More how come? by tmharish (Friar) on Jan 30, 2013 at 17:20 UTC
Ah!! I misunderstood! ( and miss read! ) Operator Precedence maybe?	[reply]
Re^4: Test::More how come? by soonix (Canon) on Jan 30, 2013 at 17:26 UTC
No, but floating point comparison	[reply]

In Section Seekers of Perl Wisdom