Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Dreaming in Perl

by dingus (Friar)
on Dec 02, 2002 at 09:48 UTC ( #216871=perlmeditation: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    for (my $i=1; $i<=10000; $i++) {
      my $s = Sheep->new($i);
      $gate->through($s);
    }
    
  2. or download this
    my @herd;
    for (1..10000) {
      push @herd(Sheep->new($_));
    }
    $gate->through(\@herd);
    
  3. or download this
    $gate->through(Sheep->new($_)) for (1..10000);
    
  4. or download this
    $me =~ s!wide awake!fast asleep!g;
    
  5. or download this
    $me =~ s!wide awake!asleep(fast)!ge;
    
  6. or download this
    $me =~ s!wide awake!asleep('fast')!ge;
    
  7. or download this
    $me =~ s!(wide )?awake!asleep('fast')!ge;
    
  8. or download this
    $me =~ s!(?:wide\s+)?awake!asleep('fast')!ge;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://216871]
Approved by claree0
Front-paged by krisahoch
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2014-07-31 04:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (244 votes), past polls