URI-1.69HEADURI-1.69master

1 files changed, 15 insertions, 0 deletions

diff --git a/t/cwd.t b/t/cwd.t
new file mode 100644
index 0000000..a890ee5
--- /dev/null
+++ b/t/cwd.t
@@ -0,0 +1,15 @@
+#!perl -T
+
+use strict;
+use warnings;
+
+use Test::More;
+
+plan tests => 1;
+
+use URI::file;
+$ENV{PATH} = "/bin:/usr/bin";
+
+my $cwd = eval { URI::file->cwd };
+is($@, '', 'no exceptions');
+