use Config;
$Config{usethreads} or die "Recompile Perl with threads.";