note
Perl Mouse
<!-- Node text goes above. Div tags should contain sig only -->
Hmmm, that would mean if there's a bit of cold coffee from yesterday, you're stuck - you aren't getting fresh coffee.
<code>
$mug =~ s/.*/coffee/s, sleep(1500 + rand 600) while 1;
</code>
Or maybe:
<code>
$mug =~ s/.*/beer/s, sleep(1500 + rand 600) while 1;
</code>
<div class="pmsig"><div class="pmsig-496863">
<tt><font color="purple">Perl</font> <font color="red">--((8:>*</font></tt>
</div></div>
503250
503295