note
djantzen
<p>
I think I'd change the second one from <code>@ISA = qw(dandy);</code> to something like <code> push (@attributes, 'dandy');</code> to avoid equivocating on the meaning of 'is', which can mean the category in which a being properly resides, as in <i>The Cow</i>, or equality (i.e., "A horse is a horse"), or an assignment of a property to an object, as in <i>Ice-Breaking</i>.
<p>
My first Perl poem, actually, my first poem at all since eighth grade, but here goes:
<p>
<i>Reflection on Caution</i><br>
by Ogden Nash<br><br>
Affection is a noble quality;<br>
It leads to generosity and jollity.<br>
But it also leads to breach of promise<br>
If you go around lavishing it on red-hot momise
<code>
$affection = 'noble' and
do { $generosity++; $jollity++ };
warn --$promise
if push @red_hot_momise, $affection;
</code>
191589
191589