#!/usr/bin/perl -w # see if using Math::BigInt and Math::BigFloat works together nicely. # all use_lib*.t should be equivalent, except this, since the later overrides # the former lib statement use strict; use Test::More tests => 2; BEGIN { unshift @INC, 't'; } use Math::BigInt lib => 'BareCalc'; use Math::BigFloat lib => 'Calc'; is (Math::BigInt->config()->{lib},'Math::BigInt::Calc'); is (Math::BigFloat->new(123)->badd(123),246);