Help for this page
perl -i'*' -anle"@f=<c:/test/*>; shift @F; push @F, scalar @f; print j +oin ' ', @F;" counts
echo 0 0 0 0 0 0 0 0 > counts