From c955c24dc35d3e5f72e42b601ced06a6fae1f115 Mon Sep 17 00:00:00 2001 From: ehouse Date: Wed, 21 Jul 2004 02:04:57 +0000 Subject: [PATCH] print words up to 99 letters long --- dawg/dictstats.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dawg/dictstats.pl b/dawg/dictstats.pl index af24f0c68..dcee9fe34 100755 --- a/dawg/dictstats.pl +++ b/dawg/dictstats.pl @@ -41,7 +41,7 @@ print "Number of letters: $letterCount\n\n"; print "**** word sizes ****\n"; print "SIZE COUNT PERCENT\n"; -for ( my $i = 1 ; $i <= 15; ++$i ) { +for ( my $i = 1 ; $i <= 99; ++$i ) { my $count = $wordSizeCounts[$i]; if ( $count > 0 ) { my $pct = (100.00 * $count)/$wordCount;