aboutsummaryrefslogtreecommitdiffstats
path: root/perl/test/chown.t
diff options
context:
space:
mode:
Diffstat (limited to 'perl/test/chown.t')
-rw-r--r--perl/test/chown.t14
1 files changed, 0 insertions, 14 deletions
diff --git a/perl/test/chown.t b/perl/test/chown.t
deleted file mode 100644
index 8ccbb88..0000000
--- a/perl/test/chown.t
+++ /dev/null
@@ -1,14 +0,0 @@
-#!/usr/bin/perl
-use test::helper qw($_real $_point);
-use Test::More;
-plan tests => 4;
-my (@stat);
-chdir($_point);
-system("echo frog >file");
-ok(chown(0,0,"file"),"set 0,0");
-@stat = stat("file");
-ok($stat[4] == 0 && $stat[5] == 0,"0,0");
-ok(chown(1,1,"file"),"set 1,1");
-@stat = stat("file");
-ok($stat[4] == 1 && $stat[5] == 1,"1,1");
-unlink("file");