I didn't think I'd go wrong on such a trivial program.

I've long since learned that, however trivial the program, I can always get it wrong!

Would ... self-flagellation ... count as pleasure rather than punishment?

This seems to be undefined in Perl5. Perhaps in Perl6...?