docs: |
    This is a godawful function. You should be using regular expressions
    instead. See L<perlretut> and L<perlre>.