Не проще разбить строку на части, обработать их, а потом собрать заново? Например, так.

#!/bin/bash

while read line
do
        NAME=${line%=*}
        PHONE=${line#*=}
        PHONE=$(echo $PHONE | sed -r 's/( |-|\(|\))//g')
        echo "${NAME}=${PHONE}"
done < data.list

AWK

BEGIN { FS="=" }
      { gsub("[() -]", "", $2)
        sub("^8", "+7", $2)
        print $1, "=", $2
      }

Спасибо!

Именно то, что нужно! Очень Вам признателен!

yoghurt,

А что лучше использовать AWK или SED? Например, если список очень большой? Sed, почему-то, для меня менее устрашающе выглядит, чем Awk. ) Есть ли существенная разница?

Если рассматривать эти два куска кода выше, то скрипт на awk будет выполнен одним процессом для всего входного файла, а вот на баше sed будет запускаться для каждой строчки. Поэтому, в теории, awk быстрее (при прочих равных).

Можно просто запустить и посмотреть :)

костыль

sed 's/\([0-9]\)[ ()-]*/\1/g'

Впрочем, я уверен, что awk (в виде MAWK) всех порвёт

Спасибо!

Постараюсь познакомиться с awk поближе.

А почему костыль? Вроде тоже нормально отработал. Я правильно понял, что здесь sed ищет первое «циферное» совпадение? То есть нужны определенные требования к первой части списка, там где имена?

Да, поэтому и костыль. Но если в именах на конце нет цифр, то всё будет работать как надо.

Спасибо всем! Тему отмечаю как решенную.

Впрочем, я уверен, что perl всех порвёт

Очевидный фикс

perl -e 'foreach $line (<STDIN>){ $line =~ /(.*\=)(.*)/g; $tmp = $2; $tmp =~ tr/0-9//cd; print «$1+$tmp\n»}'