X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=jibberish;h=b4f219d799a6a61a32fe48d544cc6759bded3a2e;hb=e99ec25514ebceb45c215fba14319769d34904db;hp=80b6139eebea7bf44adbc27d007b6a97ec86e39c;hpb=0652168f256975e2f58de1677bb000f8d3c33194;p=filters.git

diff --git a/jibberish b/jibberish
index 80b6139..b4f219d 100644
--- a/jibberish
+++ b/jibberish
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# jibberish -- run all filters in random order
+# jibberish -- run filters in random order
 
 $ENV{PATH}.=":/usr/games";
 
@@ -13,21 +13,15 @@ kraut
 cockney
 jive
 nyc
+ken
+ky00te
 rasterman
-);
-
-@nonfree= qw(
-kyoote
 newspeak
+studly
+censor
+spammer
 );
 
-# Test to see if non-free filters are here, if so, add them to @all.
-foreach (@nonfree) {
-	if (-x "/usr/games/$_") {
-		push @all, $_;
-	}
-}
-
 # shuffle order
 srand;
 for (0..$#all) {
@@ -38,9 +32,9 @@ for (0..$#all) {
 }
 
 # start the pipe...
-my $pipe= join '|', @all;
+my $pipe= join '|', @all[0..3 + rand(5)];
 open FILTER, "$pipe|"
-	or die ""Never mind...\n";;
+	or die "Never mind...\n";
 
 # display the results
 while (<FILTER>) {