Perl sed alternatives