Perl in Fall

[BronzeWing]

It doesn't do anything, but it will compile and execute. And in traditionall haiku style, it is indeed about a season.

Perl In Fall

$Leaves = 60;
$Leaves-- until
$Leaves eq '0';

---

Perl Monks do it more than one way.

[BronzeWing]

At pfaut's suggestion, here's one that prints out "Just another perl hacker."

$me = "Just a";
print "other perl hacker.\n" if
print $me and print "n";

Hmm, the problem with making code haiku is that people pronounce symbols different ways... imagine trying to write a haiku in perl if you pronounced each "dollar sign".

---

Perl Monks do it more than one way.

[Aristotle]

Somewhere during my young and innocent BASIC days, annoyed at the lengthy (even more so in German) "dollar sign", I picked up the habit of pronouncing $ as "string". I have never been able to shake it since. :)

Makeshifts last the longest.

[batkins]

same here, aristotle. :)

sometimes i even find myself pronouncing it in UNC shares: \\server\share$ ("share string")

[Reverend Phil]

I have not developed via habit a wonderful shortcut for dollar sign (or just dollar). I think if I'm going to give it the verbal chop, I'll try training myself to use Buck. You know, buck as in dollar. If I can knock it to one syllable, I'll get more ! for my speaking $.
=)

-=rev=-

[krisahoch]

Leaves equals sixty
Leaves decrement until
Leaves equal zero

Update: The last line had six syllables (equal to). That is what I was pointing out. The <AnalAlert>equality comparison operator (==) </AnalAlert> has always been pronounced 'equal to' by me and those that I have encounted. Mr. Muskrat told me that I should remove it, so I first went to <Anal Alert> a dictionary</AnalAlert> and looked it up. After reading the definition, I found that I can now say either 'equal' or 'equal to' when speaking of the <AnalAlert>equality comparison operator (==) </AnalAlert>

---

Kristofer Hoch
Si vos can lego is, vos es super erudio

[BronzeWing]

Hi,
I see that as I expected my poem has a different number of syllables than it did in my head. :p I'm afraid it comes from not having any other perl coders to talk (out loud) to. For reference, here's how I pronounced the symbols while I was writing it:

Leaves equals sixty.
Leaves-minus-minus, until
Leaves equals zero.

-BronzeWing