Commit | Line | Data |
---|---|---|
7ff56534 | 1 | #!/usr/bin/perl |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | ||
a28e50e4 | 6 | use Test::More; |
d5733154 | 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 | |
a28e50e4 | 18 | done_testing; |