1 files changed, 0 insertions, 13 deletions
diff --git a/perl/test/read.t b/perl/test/read.t
deleted file mode 100644
index 5eca920..0000000
--- a/perl/test/read.t
+++ /dev/null
@@ -1,13 +0,0 @@
-#!/usr/bin/perl
-use test::helper qw($_real $_point);
-use Test::More;
-plan tests => 3;
-chdir($_real);
-system("echo frog >file");
-chdir($_point);
-ok(open(FILE,"file"),"open");
-my ($data) = <FILE>;
-close(FILE);
-is(length($data),5,"right amount read");
-is($data,"frog\n","right data read");
-unlink("file");