1 files changed, 0 insertions, 17 deletions
diff --git a/contrib/perl5/ext/Thread/specific.t b/contrib/perl5/ext/Thread/specific.t
deleted file mode 100644
index da130b1..0000000
--- a/contrib/perl5/ext/Thread/specific.t
+++ /dev/null
@@ -1,17 +0,0 @@
-use Thread;
-
-use Thread::Specific qw(foo);
-
-sub count {
-    my $tid = Thread->self->tid;
-    my Thread::Specific $tsd = Thread::Specific::data;
-    for (my $i = 0; $i < 5; $i++) {
-	$tsd->{foo} = $i;
-	print "thread $tid count: $tsd->{foo}\n";
-	select(undef, undef, undef, rand(2));
-    }
-};
-
-for(my $t = 0; $t < 5; $t++) {
-    new Thread \&count;
-}