type * | perl -ne "print unless /^Total\s\d{1,5}/" > ..\newFile

##</code><code>##

perl -e "while (<*>) {open(F,$_) or next;while(<F>){print unless /^Total\s\d{1,5}/}}" > ..\newFile