$q= CGI->new(); print $q->threader();