如何使用Perl製作shell腳本？

Question

我有一個Perl腳本調用replaceUp：

#!/usr/bin/perl           

search=$1 
replace=$2 

find . -type f -exec perl -p -i -e "s/$search/$replace/g" {} \; 

劇本沒有得到加載。這表明我的腳本是錯誤的。

如何使用Perl製作shell腳本？

Answer 1

第一行應該是#!/bin/sh，而不是#!/usr/local/bin/perl。你錯了，那是一個Perl腳本;它是一個調用Perl的shell腳本。

它也不會實際工作，因爲$ search和$ replace不會在單引號內插入。嘗試單引號裏面的雙引號。

或更好的是，嘗試my mass search/replace Perl script。我爲此保留了一個純Perl腳本，因爲，大規模搜索/替換是危險的，所以不需要多層次的shell元字符解釋，從危險到絕對致命。