plxc16479> ex.pl
Foo::BUILD running
Use of uninitialized value in sqrt at Foo.pm line 17.
Foo::Bar before BUILD running
Foo::BUILD running
$VAR1 = bless( {
                 'y' => '5',
                 'x' => 25
               }, 'Foo::Bar' );