☰

awk добавить значение в поле

tag-icon • tag-icon text-processing awk
awk добавить значение в поле

Я ищу идею о том, как добавить значение в поле. Мой файл выглядит так:

line(001)=YR200PR1030,YR230PR1580,YR340PR2016,
          YR450PR2450,
          PRF3500,
line(002)=YR200PR452,YR230PR740,YR340PR1500,
          YR450PR2120,
          PRF2800,

и я хочу добавить значение 32 к каждому значению между YR и PR, например:
YR200PR1030-->YR232PR1030

Есть идеи? Спасибо.

решение1

Если вам нужно увеличить числовое значение, найденное между каждым вхождением YRи PR, вы можете попробовать:

$ perl -pe 's/YR(\d+)PR/sprintf("YR%sPR",$1 + 32)/eg' file
line(001)=YR232PR1030,YR262PR1580,YR372PR2016,
          YR482PR2450,
          PRF3500,
line(002)=YR232PR452,YR262PR740,YR372PR1500,
          YR482PR2120,
          PRF2800,

Или, чтобы отредактировать файл на месте:

perl -i -pe 's/YR(\d+)PR/sprintf("YR%sPR",$1 + 32)/eg' file

Значение -pe"пrint каждую строку после применения скрипта, заданного параметром -e". Сам скрипт представляет собой просто оператор подстановки ( s/old/new/) с /gфлагом для «глобального» (соответствует каждому вхождению в строке) и , /eкоторый позволяет нам выполнять код в правой части оператора. Наконец, регулярное выражение сопоставит одну или несколько цифр ( \d+) между a YRи a PR, зафиксировав цифры как $1, а затем замена выведет YR, захваченное число плюс 32 и PR.

решение2

Использование любого awk в любой оболочке на любой машине UNIX:

$ cat tst.awk
{
    while ( match($0,/YR[0-9]+PR/) ) {
        printf "%s%d", substr($0,1,RSTART+1), substr($0,RSTART+2)+32
        $0 = substr($0,RSTART+RLENGTH-2)
    }
    print
}

.

$ awk -f tst.awk file
line(001)=YR232PR1030,YR262PR1580,YR372PR2016,
          YR482PR2450,
          PRF3500,
line(002)=YR232PR452,YR262PR740,YR372PR1500,
          YR482PR2120,
          PRF2800,

решение3

Команда

for ((j=1;j<=2;j++)); do awk -v j="$j" -F "," 'NR==j && ORS=","{for(i=1;i<=NF;i++){if ($i ~ /^YR[0-9]*PR[0-9]*/){print substr($i,1,2)substr($i,3,3)+32substr($i,6)}else {print $i}}}' p.txt; echo -e "\n"; done

выход

YR232PR1030,YR262PR1580,YR372PR2016,YR482PR2450,

YR232PR452,YR262PR740,YR372PR1500,YR482PR2120,PRF2800,

Связанный контент