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

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);