Need Replacement for sed

Hi

Can anyone provide me the replacement of sed with xargs perl syntax for the below

sed -e :a -e '/;$/!N;s/\n//; ta' -e 's/;$//'

This should be without looping has to take minimal time for search