Re: PerlMonks needs...

[earthboundmisfit]

fishing poles... more specifically, fly rods.

use Nineweight;
tie ($fly, Nineweight);
while (!$fish) {
    cast;
    if($arms == 'sore') {
        rest(5);
        cast;
        }
    }