unix下几个有用的小shell脚本

文章作者 100test 发表时间 2007:11:28 14:33:22
来源 100Test.Com百考试题网

#!/usr/bin/perl
# parameter_0 is filename
# parameter_1 is source char will be replaced
# parameter_2 is target char

$filename=$ARGV[0].
$filecontent=.

undef $/.

open(FH,$filename).
$filecontent = .
close FH.

$filecontent =~ s/$ARGV[1]/$ARGV[2]/g.

open(FH,">${filename}.new").
print FH $filecontent.
close FH.
----------------------------------------------------------------------------------------------

调用方式举例:

$cat a.txt

1234 1234
1234 * 4321

$./trans_par.pl a.txt 12 78

$cat a.txt.new

7834 7834
7834 * 4321

文件名取子串的方法:

after_file_name=`echo $file_name|awk {print substr($file_name,1,12)}`

pre_file_name=`echo $file_name|awk {print substr($file_name,1,2)}`

Unix格式文件转换成Dos格式文件:

unix2dos -q -k filename

Dos格式文件转换成Unix格式文件:

dos2unix -q -k filename

根据定时生成的文本文件字节数是否一样来判断程序是否运行正常，如果一段时间内数据没有变化，发邮件通知.