perl's s2p(1) produces non-equivalent perl for simple sed substitution

[Ralph Corderoy]

Compare

    $ sed 's/c*$/x/g' <<<abc
    abx
    $ s2p 's/c*$/x/g' | perl - <(echo abc)
    abxx
    $

sed's behaviour is correct for sed. The Perl that s2p(1) produces
doesn't do the equivalent substitution, instead matching zero c's and
the end of the string after the first substitution of c by x.

[Ralph Corderoy (ralph-inputplus)]

It should be trivial for anyone who knows regexps to "confirm" this bug so it gets some TLC. Go on, be a karma whore!