Mini Shell
Mini Shell
| Direktori : /usr/share/doc/perl-Moose-2.1005/t/cmop/ |
| Current File : //usr/share/doc/perl-Moose-2.1005/t/cmop/null_stash.t |
#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use Class::MOP;
my $non = Class::MOP::Class->initialize('Non::Existent::Package');
$non->get_method('foo');
pass("empty stashes don't segfault");
done_testing;