Truyền biến shell dưới dạng / mẫu / cho awk

Có các chức năng sau trong một trong các hàm shell của tôi:

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

, vì vậy khi được gọi là as _process $arg, $argđược truyền vào $1và được sử dụng làm mẫu tìm kiếm. Nó hoạt động theo cách này, vì vỏ mở rộng $1thay cho mẫu awk! Cũng lcó thể được sử dụng trong chương trình awk, được khai báo với -v l="$line". Tất cả đều ổn.

Có thể theo cách tương tự đưa ra mô hình để tìm kiếm như một biến?

Theo dõi sẽ không hoạt động,

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

, vì awk sẽ không diễn giải /search/như một biến, mà thay vào đó theo nghĩa đen.

Sử dụng ~toán tử của awk và bạn không cần phải cung cấp biểu thức chính tả ở phía bên phải:

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

Mặc dù điều này sẽ hiệu quả hơn (không phải đọc toàn bộ tệp)

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

Tùy thuộc vào mẫu, có thể muốn grep -Eq "$1"

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

Có một vấn đề trong đó awkmở rộng các chuỗi thoát ANSI C (như \nđối với dòng mới, \fcho nguồn cấp dữ liệu biểu mẫu, \\cho dấu gạch chéo ngược, v.v.) trong $1. Vì vậy, nó trở thành một vấn đề nếu $1chứa các ký tự dấu gạch chéo ngược phổ biến trong các biểu thức thông thường (với GNU awk4.2 trở lên, các giá trị bắt đầu bằng @/và kết thúc bằng /, cũng là một vấn đề ). Một cách tiếp cận khác không gặp phải vấn đề đó là viết nó:

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

Làm thế nào xấu nó sẽ được phụ thuộc vào việc awkthực hiện.

$ 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

Tất cả đều awkhoạt động giống nhau cho các chuỗi thoát hợp lệ mặc dù:

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

(nội dung $athông qua nguyên trạng)

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

( \\thay đổi thành \và \bthay đổi thành một ký tự backspace).

Hãy thử một cái gì đó như:

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

Không, nhưng bạn có thể chỉ cần nội suy mẫu vào chuỗi trích dẫn kép mà bạn chuyển đến awk:

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

Lưu ý rằng bây giờ bạn phải thoát khỏi chữ awk được trích dẫn hai lần, nhưng nó vẫn là cách đơn giản nhất để thực hiện điều này.

Bạn có thể sử dụng hàm eval giải quyết trong ví dụ này biến lưới trước khi awk được chạy.

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