1 files changed, 25 insertions, 0 deletions
diff --git a/lib/Env/array.t b/lib/Env/array.t
new file mode 100755
index 0000000000..ff6af2edb8
--- /dev/null
+++ b/lib/Env/array.t
@@ -0,0 +1,25 @@
+#!./perl
+
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+}
+
+BEGIN {
+	$ENV{FOO} = "foo";
+	$ENV{BAR} = "bar";
+}
+
+use Env qw(FOO $BAR);
+
+$FOO .= "/bar";
+$BAR .= "/baz";
+
+print "1..2\n";
+
+print "not " if $FOO ne 'foo/bar';
+print "ok 1\n";
+
+print "not " if $BAR ne 'bar/baz';
+print "ok 2\n";
+