Мендель Купер - Искусство программирования на языке сценариев командной оболочки

sed -e "s/$old_pattern/$new_pattern/g" $file_name

# 's' -- команда "substitute" (замены),

# а /pattern/ -- задает шаблон искомого текста.

# "g" -- флаг "global" (всеобщий), означает "выполнить подстановку для *каждого*

# обнаруженного $old_pattern во всех строках, а не только в первой строке.

exit 0 # При успешном завершении сценария -- вернуть 0.

#!/bin/bash

# Суммирует числа в заданном столбце из заданного файла.

ARGS=2

E_WRONGARGS=65

if [ $# -ne "$ARGS" ] # Проверка числа аргументов.

then

echo "Порядок использования: `basename $0` имя_файла номер_столбца"

exit $E_WRONGARGS

fi

filename=$1

column_number=$2

# Здесь используется прием передачи переменных

# из командной оболочки в сценарий awk .

# Многострочный сценарий awk должен записываться в виде: awk ' ..... '

# Начало awk-сценария.

# -----------------------------

awk '

{ total += $'"${column_number}"'

}

END {

print total

}

' "$filename"

# -----------------------------

# Конец awk-сценария.

# С точки зрения безопасности, передача shell-переменных

# во встроенный awk-скрипт, потенциально опасна,

# поэтому, Stephane Chazelas предлагает следующую альтернативу:

# ---------------------------------------

# awk -v column_number="$column_number" '

# { total += $column_number

# }

# END {

# print total

# }' "$filename"

# ---------------------------------------

exit 0

Для сценариев, которые должны строиться по принципу швейцарского армейского ножа -- "все в одном", можно порекомендовать Perl. Perl совмещает в себе мощь и гибкость sed, awkи языка программирования C. Он поддерживает модульность и объектно-ориентированный стиль программирования. Короткие сценарии Perl могут легко встраиваться в сценарии командной оболочки, и даже полностью заменить из (хотя автор весьма скептически относится к последнему утверждению).

#!/bin/bash

# Это команды shell, предшествующий сценарию на Perl.

echo "Эта строка выводится средствами Bash, перед выполнением встроенного Perl-скрипта, в \"$0\"."

echo "=============================================================================================="

perl -e 'print "Эта строка выводится средствами Perl.\n";'

# Подобно sed, Perl тоже использует ключ "-e".

echo "====================================="

exit 0

Допускается даже комбинирование сценариев на Bash и на Perl, в пределах одного файла. В зависимости от того, какая часть сценария должна исполняться, сценарий вызывается с указанием требуемого интерпретатора.

#!/bin/bash

# bashandperl.sh

echo "Вас приветствует часть сценария, написанная на Bash."

# Далее могут следовать другие команды Bash.

exit 0

# Конец сценария на Bash.

# =======================================================

#!/usr/bin/perl

# Эта часть сценария должна вызываться с ключом -x.

print "Вас приветствует часть сценария, написанная на Perl.\n";

# Далее могут следовать другие команды Perl.

# Конец сценария на Perl.

bash$ bash bashandperl.sh

Вас приветствует часть сценария, написанная на Bash.

bash$ perl -x bashandperl.sh

Вас приветствует часть сценария, написанная на Perl.

Операции сравнения, выполняемые с помощью конструкции [[ ]], могут оказаться предпочтительнее, чем [ ]. Аналогично, при сравнении чисел, в более выгодном свете представляется конструкция (( )).

a=8

# Все, приведенные ниже, операции сравнения -- эквивалентны.

test "$a" -lt 16 && echo "да, $a < 16" # "И-список"

/bin/test "$a" -lt 16 && echo "да, $a < 16"

[ "$a" -lt 16 ] && echo "да, $a < 16"

[[ $a -lt 16 ]] && echo "да, $a < 16" # Внутри [[ ]] и (( )) переменные

(( a < 16 )) && echo "да, $a < 16" # не обязательно брать в кавычки.

city="New York"

# Опять же, все, приведенные ниже, операции -- эквивалентны.

test "$city" \< Paris && echo "Да, Paris больше, чем $city" # В смысле ASCII-строк.

/bin/test "$city" \< Paris && echo "Да, Paris больше, чем $city"

[ "$city" \< Paris ] && echo "Да, Paris больше, чем $city"

[[ $city < Paris ]] && echo "Да, Paris больше, чем $city" # Кавычки вокруг $city не обязательны.

# Спасибо S.C.

Может ли сценарий рекурсивно вызывать себя самого? Да, может!

#!/bin/bash

# recurse.sh

# Может ли сценарий вызвать себя сам?

# Да, но есть ли в этом смысл?

RANGE=10

MAXVAL=9

i=$RANDOM

let "i %= $RANGE" # Генерация псевдослучайного числа в диапазоне 0 .. $MAXVAL.

if [ "$i" -lt "$MAXVAL" ]

then

echo "i = $i"

./$0 # Сценарий запускает новый экземпляр себя самого.

fi # если число $i больше или равно $MAXVAL.

# Если конструкцию "if/then" заменить на цикл "while", то это вызовет определенные проблемы.