15 use Test::More tests => 212 * 2;
17 for (my $i = 1; $i <= 10e100; $i += $i * 2) {
18 my $int = MyInteger->new( a_int => $i )->a_int;
19 cmp_ok($int, '==', $i, "Mouse groked the Int $i");
21 my $num = MyInteger->new( a_num => $i )->a_num;
22 cmp_ok($num, '==', $i, "Mouse groked the Num $i");