abp 2147: Made sure search&replace script cannot be started unintenti…

…onally (without parameters)
agunchan · Jul 19, 2010 · 44bffe4 · 44bffe4
1 parent 2e8e4e3
commit 44bffe4
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/search_and_replace.pl b/search_and_replace.pl
@@ -2,6 +2,8 @@
 
 use strict;
 
+die "Usage: $^X $0 <regexp> <replaceBy>\n" unless @ARGV >= 2;
+
 my ($from, $to) = @ARGV;
 
 doDir('.');