Lewati variabel shell sebagai / pattern / to awk

Memiliki yang berikut di salah satu fungsi shell saya:

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

, jadi ketika dipanggil sebagai _process $arg, $argakan dilewati sebagai $1, dan digunakan sebagai pola pencarian. Ini bekerja seperti ini, karena shell mengembang $1di tempat pola awk! Juga ldapat digunakan di dalam program awk, sedang dideklarasikan dengan -v l="$line". Semua baik-baik saja

Apakah mungkin dengan cara yang sama memberikan pola untuk mencari sebagai variabel?

Mengikuti tidak akan berhasil,

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

, sebagai awk tidak akan menafsirkan /search/sebagai variabel, tetapi secara harfiah.

Gunakan ~operator awk , dan Anda tidak perlu memberikan regex literal di sisi kanan:

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

Meskipun ini akan lebih efisien (tidak harus membaca seluruh file)

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

Tergantung pada polanya, mungkin ingin grep -Eq "$1"

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

Memiliki masalah dalam awkmemperluas urutan pelarian ANSI C (seperti \nuntuk baris baru, \funtuk umpan formulir, \\untuk backslash dan sebagainya) di $1. Jadi itu menjadi masalah jika $1mengandung karakter backslash yang umum dalam ekspresi reguler (dengan GNU awk4.2 atau lebih tinggi, nilai yang dimulai dengan @/dan diakhiri /, juga merupakan masalah ). Pendekatan lain yang tidak menderita dari masalah itu adalah menulisnya:

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

Seberapa buruk akan tergantung pada awkimplementasinya.

$ 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

Semua awks bekerja sama untuk urutan pelarian yang valid:

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

(konten $alulus apa adanya)

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

( \\diubah menjadi \dan \bdiubah menjadi karakter backspace).

Coba sesuatu seperti:

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

Tidak, tetapi Anda dapat dengan mudah menginterpolasikan pola tersebut ke dalam string yang dikutip ganda yang Anda lewatkan dengan awk:

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

Perhatikan bahwa Anda sekarang harus melarikan diri dari awk literal yang dikutip ganda, tetapi ini masih merupakan cara paling sederhana untuk mencapai ini.

Anda bisa menggunakan fungsi eval yang menyelesaikan dalam contoh ini variabel jaring sebelum awk dijalankan.

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