这段脚本毫无意义。。。
if ($#ARGV >= 0) { # ---如果参数个数大于等于1
while ($a=shift(@ARGV)) { #---依次把参数赋给$a
$a=~s/&/&/g; #---把$a中的&替换成&(无意义替换)(/g表示全局替换)
$a=~s/ $a=~s/>/>/g; # 也是替换
print "
把$a中出现的“>”全部替换为“>”
就是把html的特殊字符转换成html非特殊字符。例如 &要表示成&
全局替换,将 > 替换成 >