# ... else { # print "not enought files to count\n"; } } } print "total files in $total\n"; };