Trying this myself, it returns an error:

    s2p: expression #1: extra characters after command (d)

Thankfully, I've never had the job of porting a sed script to Perl, so I'm not exactly sure what that's all about. The docs mention this error, but don't explain what it means,

http://perldoc.perl.org/s2p.html

Aaaaand, obviously Perl has CPAN, so there's really no need (except to be evil):

https://metacpan.org/pod/CljPerl

(there's a few, actually, because TIMTOWTDI!)