perl -d:SubCheck yourscript.