Search and Replace Perl Snippet