用Perl替换OSX终端上的管道

Question

我想在桌面上的文件夹上的多个html文件中使用编码（％7C）批量替换管道。我尝试了以下命令但没有成功。任何帮助，将不胜感激。

cd /Users/me/Desktop/sample_dir
perl -pi -e 's!Abel|Source!Abel%7CSource!g;' *.html
perl -pi -e 'sAbel|\/Source!Abel%7CSource!g;' *.html
perl -pi -e 'sAbel|\Source!Abel%7CSource!g;' *.html

Answer 1

竖线字符是正则表达式中的特殊符号（表示＆＃34;或＆＃34;），因此需要使用\进行转义。

perl -pi -e 's!Abel\|Source!Abel%7CSource!g' *.html