1# -*- mode: perl; -*- 2 3use strict; 4use warnings; 5 6use Test::More tests => 4; 7 8{ 9 use bignum a => "12"; 10 for my $class ("Math::BigInt", "Math::BigFloat") { 11 cmp_ok($class -> accuracy(), "==", 12, "$class accuracy = 12"); 12 } 13 14 bignum -> import(accuracy => "23"); 15 for my $class ("Math::BigInt", "Math::BigFloat") { 16 cmp_ok($class -> accuracy(), "==", 23, "$class accuracy = 23"); 17 } 18} 19