1#!/usr/bin/perl -w 2 3############################################################################### 4 5use Test; 6use strict; 7 8BEGIN 9 { 10 $| = 1; 11 chdir 't' if -d 't'; 12 unshift @INC, '../lib'; 13 plan tests => 1; 14 } 15 16eval 'require Math::BigInt::Lite;'; 17if ($@ eq '') 18 { 19 # can use Lite, so let bignum try it 20 require bigrat; bigrat->import(); 21 # can't get to work a ref(1+1) here, presumable because :constant phase 22 # already done 23 ok ($bigrat::_lite,1); 24 } 25else 26 { 27 print "ok 1 # skipped, no Math::BigInt::Lite\n"; 28 } 29 30 31