C:\test>perl -d:Trace junk1000.pl >junk1000.log 2>&1

C:\test>wc -l junk1000.log
   3575 junk1000.log