diff options
Diffstat (limited to 'dist/Env/t/array.t')
-rw-r--r-- | dist/Env/t/array.t | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/dist/Env/t/array.t b/dist/Env/t/array.t index ed84834525..d6a15a6c26 100644 --- a/dist/Env/t/array.t +++ b/dist/Env/t/array.t @@ -5,16 +5,12 @@ BEGIN { $ENV{BAR} = "bar"; } +use strict; +use Test::More tests => 2; 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"; - +is($FOO, 'foo/bar'); +is($BAR, 'bar/baz'); |