From 818958abaf7ad4f86101f88e74caf688b23be9a3 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 10 Jul 2013 14:17:52 -0400 Subject: initial (non-working) implementation --- t/exporter.t | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 t/exporter.t (limited to 't/exporter.t') diff --git a/t/exporter.t b/t/exporter.t new file mode 100644 index 0000000..da39d6a --- /dev/null +++ b/t/exporter.t @@ -0,0 +1,16 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; +use lib 't/lib'; + +sub foo { 'foo' } + +is(foo(), "foo"); +{ + use Foo; + is(foo(), "FOO"); +} +is(foo(), "foo"); + +done_testing; -- cgit v1.2.3-54-g00ecf