Commit | Line | Data |
---|---|---|
7ff56534 | 1 | #!/usr/bin/perl |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | ||
d5733154 | 6 | use Test::More tests => 4; |
7 | use Test::Exception; | |
7ff56534 | 8 | |
d5733154 | 9 | lives_ok { |
10 | eval 'use Moose'; | |
11 | } "export to main"; | |
12 | ||
13 | isa_ok( main->meta, "Moose::Meta::Class" ); | |
14 | ||
15 | isa_ok( main->new, "main"); | |
16 | isa_ok( main->new, "Moose::Object" ); | |
f967bf02 | 17 |