perl -Mthreads -MWant -e 'threads->create(sub{want("OBJECT")})->join'