Help for this page

Select Code to Download

Select or download this

 #      %   Header
 1:  81.96  NAME
...
29:   1.16  WIDGET-SPECIFIC OPTIONS
30:   1.14  NOTE
Total files: 4207.

Select or download this

#!/usr/bin/perl

...
print "Total files: $count.\n";

__END__