aboutsummaryrefslogtreecommitdiffstats
path: root/perl/test/rename.t
diff options
context:
space:
mode:
Diffstat (limited to 'perl/test/rename.t')
-rw-r--r--perl/test/rename.t12
1 files changed, 0 insertions, 12 deletions
diff --git a/perl/test/rename.t b/perl/test/rename.t
deleted file mode 100644
index 9fbb330..0000000
--- a/perl/test/rename.t
+++ /dev/null
@@ -1,12 +0,0 @@
-#!/usr/bin/perl
-use test::helper qw($_real $_point);
-use Test::More;
-plan tests => 5;
-chdir($_point);
-system("echo hippity >frog");
-ok(-f "frog","exists");
-ok(!-f "toad","target file doesn't exist");
-ok(rename("frog","toad"),"rename");
-ok(!-f "frog","old file doesn't exist");
-ok(-f "toad","target file exists");
-unlink("toad");