I posted a patch to fix this bug today. So it should be resolved in the next release of blead and in Perl 5.10. Thanks for reporting it. And thanks to whoever filed the perlbug on it too (if that wasnt you).

update: Patch was applied as find 31303 in perl.git commits