if $LIFETIME_THREADS-- >0;

##</code><code>##

C:\>perl -e die(666)if-1
666 at -e line 1.

C:\>perl -e die(666)if-0

C:\>