diff options
Diffstat (limited to 't/lib/Bar.pm')
-rw-r--r-- | t/lib/Bar.pm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/t/lib/Bar.pm b/t/lib/Bar.pm new file mode 100644 index 0000000..69aadf9 --- /dev/null +++ b/t/lib/Bar.pm @@ -0,0 +1,20 @@ +package Bar; +use strict; +use warnings; + +use Exporter::Lexical (); + +our $imported; + +my $import = Exporter::Lexical::build_exporter({ + -exports => [ qw(bar) ], +}); + +sub import { + $imported = 1; + goto $import; +} + +sub bar { "BAR" } + +1; |