X-Git-Url: http://git.ieval.ro/?p=filters.git;a=blobdiff_plain;f=jibberish;h=af0ea16a34a7019558967a8eb0237232c02599bf;hp=ad2743a25a57d4047fb7a58ca47faaec16e25879;hb=408969cbf7d431c28285a0e0a4831d58634b3bfc;hpb=7e3afbbacdd24f8c3fb87599eeda32b977fe6d6c

diff --git a/jibberish b/jibberish
old mode 100644
new mode 100755
index ad2743a..af0ea16
--- a/jibberish
+++ b/jibberish
@@ -1,30 +1,26 @@
 #!/usr/bin/perl
-# jibberish -- run all filters in random order
+# jibberish -- run filters in random order
 
 $ENV{PATH}.=":/usr/games";
 
 @all= qw(
+eleet
+b1ff
+chef
+jethro
+upside-down
+kraut
+cockney
 jive
-valspeak
+pirate
 nyc
-cockney
-fin
-biffa
 ken
-aust
-drawl
-kraut
+ky00te
+rasterman
 newspeak
-chef
-marc-barrett
+studly
 censor
-fudd
-moo
-buck
-jethro
-b1ff
-eleet
-ky00te
+spammer
 );
 
 # shuffle order
@@ -37,9 +33,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>) {