2 eval { require Config; import Config };
4 print "1..0 # Skip: no Config\n";
7 if ($Config{extensions} !~ /\bThread\b/) {
8 print "1..0 # Skip: no use5005threads\n";
18 print "shouldn't get here\n";
23 eval { @r = $t->join; };
25 print "thread died with message: $@";
27 print "thread failed to die successfully\n";