note
sauoq
<p>If this is the exact code you had on your windows box, you likely had a bug there too, even if you never noticed it.</p>
<p>The problem looks like you are matching against <c>$_</c> in your eslif condition when you want to be matching against <c>$str</c>. Change that line to:
<code>
}elsif ($str =~/^\s*$/) {
</code>
</p>
<div class="pmsig"><div class="pmsig-182681">
<tt>
-sauoq<br />
"My two cents aren't worth a dime.";<br />
</tt>
</div></div>
972117
972117