X-Git-Url: https://git.donarmstrong.com/?p=deb_pkgs%2Fscowl.git;a=blobdiff_plain;f=src%2Frand-sample.pl;h=f7406fa338a6be6350b3d9a5b5c9f105018df685;hp=966df94261d6735f2f1b6f0a16ebcb7bcf91bd43;hb=ed8686a266d56471dc3fc199753ef5c7a570cec9;hpb=3daf7c4665cf26ec76f5638cfa26fd97c6ef0b6b

diff --git a/src/rand-sample.pl b/src/rand-sample.pl
index 966df94..f7406fa 100755
--- a/src/rand-sample.pl
+++ b/src/rand-sample.pl
@@ -4,6 +4,7 @@ while (<STDIN>) {
   chop;
   push @words, $_;
 }
+@words = grep {length $_ > 2} @words;
 @words = sort @words;
 @num = (0 .. $#words);