Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: Slashdot lamejoke generator

by Notromda (Pilgrim)
on Oct 02, 2003 at 18:15 UTC ( #296005=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    sub ::{ ;
            my $i=$^;
            ;
            [split /#/, join $`, map {$i^=$_} split//,pop @_ ]
          }
    
  2. or download this
    %_ = map { my $z = (($_|=$^O)?$_:::($_));      
               $_, sub {
    ...
                      }
              } 1..1024;
    ;
    
  3. or download this
    sub _ {
         +(@;=>@:) = map {[split//]} @_;
    ...
         }
         @:
    }
    
  4. or download this
     
    join ' ', @{[_(qw(oepgnf rhnuar nfarqr gu))]}[2,$?,3,$|,@;,5]
    
  5. or download this
    ($;,$:,$,,$\,$^,$==>$~,$.,$})=
    
  6. or download this
    map{sub {
                        my $i=$!;
    ...
                          y;a-z;n-za-m;;$_;
                      }
                      @$_
    
  7. or download this
    ([q"Ia Sbivrg ",
       "rf lbh",
    ...
     ["Tur arkg "."$: $~"=>"ef $} vg"." rneyl",q"vba jvyy ".'or'.qq' $^ fb
    +ba, ohg $.$,'
     ]    
    )
    
  8. or download this
    @%= map {
             my $die =$_;
    ...
                   print for join $', @$die[ $%,$==>$|]
             }
            }
    
  9. or download this
    $%[rand @%]->();
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://296005]
help
Chatterbox?
[Corion]: marto: Ow! You got hit by the storm that is bringing warm weather to me ...
[1nickt]: marto Good to hear that was the worst of it for you...
[marto]: 1nickt the worst I'm aware of at the moment :P
LanX .♩..♬ ... Another one bites the Sahara dust ...
marto wonders what fresh hell the firefox update has brought, apart from maxing out CPUs
1nickt was looking into Firefox Extended Support releases yesterday. You don't have to go with the updates!
[erix]: wonderfully red sun here
[LanX]: FF has become a source of instability :(
[1nickt]: erix not so wonderful for the lungs :-(

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (8)
As of 2017-10-17 12:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (230 votes). Check out past polls.

    Notices?