I think "Can this be done with s/// operator without e modifier" is very clear. And you give me solution with e modifier. Are you kidding me? :)
No, learn to English :)( this part joke)
You said Please tell me, is it possible with Perl regexp engine? Or can yo provide me other solution?
I gave my without /e attempted solution, then my with /e working solution, the other solution, what you asked for