--- Coro/t/19_handle.t	2009/07/20 23:46:28	1.1
+++ Coro/t/19_handle.t	2009/07/28 02:04:21	1.2
@@ -1,3 +1,12 @@
+BEGIN {
+   unless (exists $SIG{USR1}) {
+      print <<EOF;
+1..0 # SKIP Broken perl detected, skipping tests.
+EOF
+      exit 0;
+   }
+}
+
 $|=1;
 print "1..4\n";