#!perl
use strict;
use warnings;

use Math::BigInt;

my $x = new Math::BigInt 27; 
my $y = $x->new(44); # this is the funny bit
my $z = Math::BigInt->new(99);
exit;

##</code><code>##

  DB<1> x $y
0  27=HASH(0x14f15ac)
   'sign' => '+'
   'value' => ARRAY(0xbc9cd4)
      0  44

##</code><code>##

  DB<2> p $y
27=HASH(0x14f15ac)