#!/usr/local/bin/perl use Config; die $Config{usethreads};