33.2. Shell包装

  1 #!/bin/bash
  2 
  3 # 这个简单的脚本可以把文件中所有的空行删除. 
  4 # 没做参数检查. 
  5 #
  6 # 你或许想添加如下代码: 
  7 #
  8 # E_NOARGS=65
  9 # if [ -z "$1" ]
 10 # then
 11 #  echo "Usage: `basename $0` target-file"
 12 #  exit $E_NOARGS
 13 # fi
 14 
 15 
 16 # 这个脚本调用起来的效果, 
 17 # 等价于从命令行上调用: 
 18 # sed -e '/^$/d' filename. 
 19 
 20 sed -e /^$/d "$1"
 21 #  '-e'意味着后边跟的是"编辑"命令. (在这里是可选的). 
 22 #  '^'匹配行首, '$'匹配行尾. 
 23 #  这条语句用来匹配行首与行尾之间什么都没有的行, 
 24 #+ 即空白行. 
 25 #  'd'为删除命令. 
 26 
 27 #  将命令行参数引用起来, 
 28 #+ 就意味着可以在文件名中使用空白字符或者特殊字符. 
 29 
 30 #  注意, 这个脚本其实并不能真正的修改目标文件. 
 31 #  如果你想保存修改, 可以将它的输出重定向. 
 32 
 33 exit 0

  1 #!/bin/bash
  2 
  3 #  "替换", 这个脚本的用途: 
  4 #+ 将一个文件中的某个字符串(或匹配模式), 替换为另一个字符串(或匹配模式), 
  5 #+ 比如, "subst Smith Jones letter.txt".
  6 
  7 ARGS=3         # 这个脚本需要3个参数. 
  8 E_BADARGS=65   # 传递给脚本的参数个数不对. 
  9 
 10 if [ $# -ne "$ARGS" ]
 11 # 测试脚本的参数个数(这是个好办法). 
 12 then
 13   echo "Usage: `basename $0` old-pattern new-pattern filename"
 14   exit $E_BADARGS
 15 fi
 16 
 17 old_pattern=$1
 18 new_pattern=$2
 19 
 20 if [ -f "$3" ]
 21 then
 22     file_name=$3
 23 else
 24     echo "File \"$3\" does not exist."
 25     exit $E_BADARGS
 26 fi
 27 
 28 
 29 #  下面是实现功能的代码. 
 30 
 31 # -----------------------------------------------
 32 sed -e "s/$old_pattern/$new_pattern/g" $file_name
 33 # -----------------------------------------------
 34 
 35 #  's'在sed中是替换命令, 
 36 #+ /pattern/表示匹配模式. 
 37 #  "g", 即全局标志, 用来自动替换掉每行中
 38 #+ 出现的全部$old_pattern模式, 而不仅仅替换掉第一个匹配.
 39 #  如果想深入了解, 可以参考'sed'命令的相关书籍. 
 40 
 41 exit 0    # 成功调用脚本, 将会返回0. 

  1 #!/bin/bash
  2 #  通用的shell包装, 
  3 #+ 执行一个操作, 然后把所作的操作写入到日志文件中. 
  4 
  5 # 需要设置如下两个变量. 
  6 OPERATION=
  7 #         可以是一个复杂的命令链, 
  8 #+        比如awk脚本或者一个管道 . . .
  9 LOGFILE=
 10 #         命令行参数, 不管怎么样, 操作一般都需要参数. (译者注: 这行解释的是下面的OPTIONS变量, 不是LOGFILE.)
 11 
 12 
 13 OPTIONS="$@"
 14 
 15 
 16 # 记录下来. 
 17 echo "`date` + `whoami` + $OPERATION "$@"" >> $LOGFILE
 18 # 现在, 执行操作. 
 19 exec $OPERATION "$@"
 20 
 21 # 必须在操作执行之前, 记录到日志文件中. 
 22 # 为什么? 

  1 #!/bin/bash
  2 # pr-ascii.sh: 打印ASCII码的字符表. 
  3 
  4 START=33   # 可打印的ASCII字符的范围(十进制). 
  5 END=125
  6 
  7 echo " Decimal   Hex     Character"   # 表头. 
  8 echo " -------   ---     ---------"
  9 
 10 for ((i=START; i<=END; i++))
 11 do
 12   echo $i | awk '{printf("  %3d       %2x         %c\n", $1, $1, $1)}'
 13 # 在这种上下文中, 不会运行Bash内建的printf命令: 
 14 #     printf "%c" "$i"
 15 done
 16 
 17 exit 0
 18 
 19 
 20 #  十进制   16进制     字符
 21 #  -------  ------   ---------
 22 #    33       21         !
 23 #    34       22         "
 24 #    35       23         #
 25 #    36       24         $
 26 #
 27 #    . . .
 28 #
 29 #   122       7a         z
 30 #   123       7b         {
 31 #   124       7c         |
 32 #   125       7d         }
 33 
 34 
 35 #  将脚本的输出重定向到一个文件中, 
 36 #+ 或者通过管道传递给"more":  sh pr-asc.sh | more

  1 #!/bin/bash
  2 
  3 # 给目标文件添加(由数字组成的)指定的一列. 
  4 
  5 ARGS=2
  6 E_WRONGARGS=65
  7 
  8 if [ $# -ne "$ARGS" ] # 检查命令行参数个数是否正确. 
  9 then
 10    echo "Usage: `basename $0` filename column-number"
 11    exit $E_WRONGARGS
 12 fi
 13 
 14 filename=$1
 15 column_number=$2
 16 
 17 #  将shell变量传递给脚本的awk部分, 需要一点小技巧. 
 18 #  一种办法是, 将awk脚本中的Bash脚本变量, 
 19 #+ 强引用起来. 
 20 #     $'$BASH_SCRIPT_VAR'
 21 #      ^                ^
 22 #  在下面的内嵌awd脚本中, 就会这么做. 
 23 #  请参考awk的相关文档来了解更多的细节. 
 24 
 25 # 多行awk脚本的调用格式为:  awk ' ..... '
 26 
 27 
 28 # 开始awk脚本. 
 29 # -----------------------------
 30 awk '
 31 
 32 { total += $'"${column_number}"'
 33 }
 34 END {
 35      print total
 36 }     
 37 
 38 ' "$filename"
 39 # -----------------------------
 40 # 结束awk脚本. 
 41 
 42 
 43 #   将shell变量传递给内嵌awk脚本可能是不安全的, 
 44 #+  所以Stephane Chazelas提出了下边这种替代方法: 
 45 #   ---------------------------------------
 46 #   awk -v column_number="$column_number" '
 47 #   { total += $column_number
 48 #   }
 49 #   END {
 50 #       print total
 51 #   }' "$filename"
 52 #   ---------------------------------------
 53 
 54 
 55 exit 0

  1 #!/bin/bash
  2 
  3 # Shell命令可以放到Perl脚本的前面. 
  4 echo "This precedes the embedded Perl script within \"$0\"."
  5 echo "==============================================================="
  6 
  7 perl -e 'print "This is an embedded Perl script.\n";'
  8 # 类似于sed, Perl也可以使用"-e"选项. 
  9 
 10 echo "==============================================================="
 11 echo "However, the script may also contain shell and system commands."
 12 
 13 exit 0

  1 #!/bin/bash
  2 # bashandperl.sh
  3 
  4 echo "Greetings from the Bash part of the script."
  5 # 这里可以放置更多的Bash命令. 
  6 
  7 exit 0
  8 # 脚本的Bash部分结束. 
  9 
 10 # =======================================================
 11 
 12 #!/usr/bin/perl
 13 # 脚本的这部分必须使用-x选项来调用. 
 14 
 15 print "Greetings from the Perl part of the script.\n";
 16 # 这里可以放置更多的Perl命令. 
 17 
 18 # 脚本的Perl部分结束.