in reply to The beauty that is perl.

Can you guess what each is going to print before you run it?
No. I can hardly read them.

Reminds me of something in the back of the ol' campus newspaper. Find the comma: 

.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
.....................................................
..,..................................................
.....................................................

[download]

Replies are listed 'Best First'.
Re: The beauty that is perl.
by Anonymous Monk on Apr 04, 2004 at 01:37 UTC

    I'm almost embarrassed to say that it actually took me about 30 seconds to locate the comma. *Invents the "find the small L" gimmick*: 

    1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
111111111111111111111111111111l111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111

    [download]
[reply]
[d/l]
      CTRL+F, one el one ENTER

      About 2 seconds :)

      cLive ;-)

[reply]

      5,30 in around 10 seconds:)

      Examine what is said, not who speaks.
      "Efficiency is intelligent laziness." -David Dunham
      "Think for yourself!" - Abigail
[reply]
[d/l]

        Index starting at 0? Very peculiar, sounds like a program discovered this, not a human brain. Perhaps...??? 

        $c = -1;
while (<DATA>) {
   ++$c;
   print $c, ',', index($_, 'l'), "\n" if index($_, 'l') > -1;
}

__DATA__
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
111111111111111111111111111111l111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111
1111111111111111111111111111111111111111

        [download]
[reply]
[d/l]
Re: The beauty that is perl.
by cLive ;-) (Prior) on Apr 04, 2004 at 06:55 UTC
    CTRL + PLUS(+) + PLUS(+) + PLUS(+) +PLUS(+)

    I like Fire(\w+) :)

    cLive ;-)

[reply]

In Section Meditations