note
Athanasius
<p>++[tinita] for highlighting the important difference between testing for definedness and testing for truth (see [doc://perlsyn#Truth-and-Falsehood|perlsyn#Truth-and-Falsehood]).</p>
<p>But even with the correction I prefer my version. Readability is in the eye of the programmer, but the first high-level programming subject I took at Uni (in Pascal!) emphasised <i>structured programming</i>, and this has remained with me. I prefer a function to have a single exit point (at the end) where possible. In Perl this is <i>not</i> always optimum, so I’ve had to learn to be flexible. But when — as in this case — the structured version is as straightforward as the non-structured one, I prefer the former. YMMV.</p>
<p>As always in Perl, TMTOWTDI.</p>
<div class="pmsig"><div class="pmsig-968231">
<p>
<table width="100%">
<tr>
<td align="left">
Athanasius <font color="#008000"><</font>[href://http://www.biblegateway.com/passage/?search=John%203:16&version=NLV|<font color="#008000">°</font>]<font color="#008000">(((><</font> <i>contra mundum</i>
</td>
<td align="right">
[href://http://translate.google.com.au/#la/en/Iustus%20alius%20egestas%20vitae%2C%20eros%20Piratica%2C|<b>Iustus alius egestas vitae, eros Piratica,</b>]
</td>
</tr>
</table>
</p>
</div></div>
1057121
1057134