Lines Matching full:base
6 use_ok('base');
16 use base qw(No::Version);
19 # Test Inverse of $VERSION bug base.pm should not clobber existing $VERSION
26 use base qw(Has::Version);
36 use base 'Eval1';
51 eval q{use base 'reallyReAlLyNotexists'};
52 like( $@, qr/^Base class package "reallyReAlLyNotexists" is empty\./,
53 'base with empty package');
55 eval q{use base 'reallyReAlLyNotexists'};
56 like( $@, qr/^Base class package "reallyReAlLyNotexists" is empty\./,
61 eval q{package HomoGenous; use base 'HomoGenous';};
71 use base qw(Has::Version_0);
81 eval q{ use base 'Schlozhauer' };
88 eval q{use base 'Broken';};
90 'base fails to compile by loading nonexistent module');
97 my $base = "M\N{U+00D8}dule";
99 *{"${base}::foo"} = sub {};
100 eval q{use base $base;};
106 my $base = "M\N{U+00D8}dule";
107 utf8::encode($base);
109 *{"${base}::foo"} = sub {};
110 eval q{use base $base;};
118 my $base = "NonExistentModule";
120 *{"${base}::foo"} = sub {};
121 eval q{use base $base;};