Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

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);
  2. or download this
    my @herd;
    for (1..10000) {
      push @herd(Sheep->new($_));
  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?

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (6)
As of 2015-11-29 11:23 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (750 votes), past polls