- or download this
#!perl
use strict;
...
my $y = $x->new(44); # this is the funny bit
my $z = Math::BigInt->new(99);
exit;
- or download this
DB<1> x $y
0 27=HASH(0x14f15ac)
'sign' => '+'
'value' => ARRAY(0xbc9cd4)
0 44
- or download this
DB<2> p $y
27=HASH(0x14f15ac)