C:\test>perl -Mthreads 
-wle"async{require CGI; print 'T:'.%{CGI::}}->detach; sleep 2; print 'M:'.%{CGI::};"

T:61/128
M:0