- or download this
package Foo;
use Moose;
...
}
1;
- or download this
package Foo::Bar;
use Moose;
...
};
1;
- or download this
use lib '.';
use Foo::Bar;
...
my $o = Foo::Bar->new;
print STDERR Dumper($o);
- or download this
plxc16479> ex.pl
Foo::BUILD running
Use of uninitialized value in sqrt at Foo.pm line 17.
...
'y' => '5',
'x' => 25
}, 'Foo::Bar' );