Kabuk değişkenini a / pattern / awk olarak geçir

Aşağıdakiler benim kabuk fonksiyonlarımdan birinde:

function _process () {
  awk -v l="$line" '
  BEGIN {p=0}
  /'"$1"'/ {p=1}
  END{ if(p) print l >> "outfile.txt" }
  '
}

Böylece olarak adlandırılan zaman _process $arg, $argolarak iletilir $1ve bir arama deseni olarak kullandı. Bu şekilde çalışır, çünkü kabuk $1awk deseni yerine genişler ! Ayrıca lawk programının içinde de bildirilerek kullanılabilir -v l="$line". Her şey yolunda.

Değişken olarak aramak için desen vermek aynı şekilde mümkün mü?

Aşağıdaki işe yaramayacak,

awk -v l="$line" -v search="$pattern" '
  BEGIN {p=0}
  /search/ {p=1}
  END{ if(p) print l >> "outfile.txt" }
  '

Çünkü awk /search/bir değişken olarak yorumlanmayacak , tam anlamıyla.

Awk ~operatörünü kullanın ve sağ tarafta değişmez bir regex sağlamanız gerekmez:

function _process () {
    awk -v l="$line" -v pattern="$1" '
        $0 ~ pattern {p=1} 
        END {if(p) print l >> "outfile.txt"}
    '  
}

Her ne kadar bu daha verimli olsa da (tüm dosyayı okumak zorunda değilsiniz)

function _process () {
    grep -q "$1" && echo "$line"
}

Desene bağlı olarak, isteyebilirsiniz grep -Eq "$1"

awk  -v pattern="$1" '$0 ~ pattern'

awkANSI C çıkış sırasını genişletme sorunu var ( \nnewline \fiçin, form beslemesi \\için, ters eğik çizgi için vb.) $1. Bu nedenle $1, düzenli ifadelerde yaygın olan ters eğik çizgi karakterleri içeriyorsa, bu bir sorun haline gelir (GNU awk4.2 veya üzeri, başlangıç @/ve bitiş değerleri /de sorun olur ). Bu sorundan muzdarip olmayan bir başka yaklaşım da yazmaktır:

PATTERN=$1 awk '$0 ~ ENVIRON["PATTERN"]'

Ne kadar kötü olacağı awkuygulamaya bağlı olacaktır .

$ nawk -v 'a=\.' 'BEGIN {print a}'
.
$ mawk -v 'a=\.' 'BEGIN {print a}'
\.
$ gawk -v 'a=\.' 'BEGIN {print a}'
gawk: warning: escape sequence `\.' treated as plain `.'
.
$ gawk5.0.1 -v 'a=@/foo/' BEGIN {print a}'
foo

Hepsi awkgeçerli kaçış dizileri için aynı şekilde çalışır:

$ a='\\-\b' awk 'BEGIN {print ENVIRON["a"]}' | od -tc
0000000   \   \   -   \   b  \n
0000006

( $aolduğu gibi geçirilen içerik )

$ awk -v a='\\-\b' 'BEGIN {print a}' | od -tc
0000000   \   -  \b  \n
0000004

(olarak \\değiştirildi \ve \bbir geri alma karakteriyle değiştirildi).

Gibi bir şey deneyin:

awk -v l="$line" -v search="$pattern" 'BEGIN {p=0}; { if ( match( $0, search )) {p=1}}; END{ if(p) print l >> "outfile.txt" }'

Hayır, ancak deseni basitçe awk'ye ilettiğiniz çift tırnaklı dizgiye enterpolasyon yapabilirsiniz:

awk -v l="$line" "BEGIN {p=0}; /$pattern/ {p=1}; END{ if(p) print l >> \"outfile.txt\" }"

Şimdi, çift tırnaklı awk kelimesinden kaçmak zorunda olduğunuzu unutmayın, ancak yine de bunu başarmanın en basit yolu budur.

Bu örnekte, awk çalıştırılmadan önce ağlar değişkenini çözen eval işlevini kullanabilirsiniz.

nets="searchtext"
eval "awk '/"${nets}"/'" file.txt