Một câu hỏi về awk

Ok, vì đây là một câu hỏi phức tạp, tôi sẽ giải thích rõ ràng. Tôi có một nội dung tập tin như dưới đây:

$ Cat File1 
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {TBMKF}
ABC Cool Lol POP {YUKER}
ABC Cool Lol POP {EFEFVD}

Đầu ra mà tôi muốn

-Cool MNB +  POP ;
-Cool MNB  + POP ;
-Cool MNB  + POP ;
-Cool TBMKF + POP ;
-Cool YUKER + POP ;
-Cool EFEFVD +POP ;

Đầu tiên tôi cố gắng lấy ra cột cuối cùng từ File1và in ra sed 's/[{}//g' File1 > File3

Sau đó tôi sao chép toàn bộ nội dung File1sang một cái mớiFile4

cp File1 File4

Sau đó, tôi thay thế dữ liệu bên trong File4bằng File3dữ liệu (có nghĩa là dữ liệu không có khung một " File1cột cuối cùng đó")

awk 'FNR==NR{a[NR]=$1;next}{$5=a[FNR]}1' File3 File4 >>File5 

Đầu ra nên như thế này

ABC Cool Lol POP MNB
ABC Cool Lol POP MNB
ABC Cool Lol POP MNB
ABC Cool Lol POP TBMKF
ABC Cool Lol POP YUKER
ABC Cool Lol POP EFEFVD

Cuối cùng, tôi cố gắng

awk -F“ " '{print - $2,$5 +,$4 ";"}‘ File5

Nhưng kết quả đã không diễn ra như tôi muốn, chỉ có dữ liệu tương tự MNB được liệt kê xuống, những người khác không hiển thị (Tệp một dữ liệu cột cuối cùng),

Tôi không biết tại sao bạn lại sao chép những thứ trái và phải. Điều đơn giản là

awk '{print "-" $2, substr($5,2,length($5)-2), "+", $4, ";"}' File1

Tôi đặt -vào đầu và ;cuối rồi.

Ở giữa chúng tôi in

• $2 bởi vì chúng tôi muốn nó như nó là.
• một chuỗi con của $5, đó là chuỗi không có ký tự đầu tiên và cuối cùng. Chúng tôi bỏ qua ký tự đầu tiên bằng cách bắt đầu ở vị trí 2 (awk luôn lạ về điều đó) và bỏ qua ký tự cuối cùng bằng cách chỉ chọn một chuỗi con ngắn hơn hai ký tự, so với bản gốc$5
• các +vì chúng tôi muốn nó
• và sau đó $4

Tuy nhiên, tôi không chắc liệu tất cả các hàm chuỗi này có dành riêng cho GNU awk hay không.

Với sed

sed '
    s/\S\+\s/-/
    s/\(\S\+\s\)\{2\}{\(\S\+\)}/\2 + \1;/
    ' File1

Và biến thể awk

awk -F"[[:blank:]{}]+" '{print "-" $2, $5, "+", $4}' ORS=" ;\n" File1

Công việc TXR dễ dàng :

$ txr -c '@(repeat)
@a @b @c @d {@e}
@(do (put-line `-@b @e + @d ;`))
@(end)' -
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {MNB}
ABC Cool Lol POP {TBMKF}
ABC Cool Lol POP {YUKER}
ABC Cool Lol POP {EFEFVD}
[Ctrl-D][Enter]
-Cool MNB + POP ;
-Cool MNB + POP ;
-Cool MNB + POP ;
-Cool TBMKF + POP ;
-Cool YUKER + POP ;
-Cool EFEFVD + POP ;

Sử dụng macro TXR Lisp awk để chuyển ngữ giải pháp Awk:

 txr -e '(awk (t (prn `-@[f 1] @{[f 4] [1..-1]} + @[f 3] ;`)))'

Các trường nằm trong fdanh sách và lập chỉ mục là không dựa trên.

Sử dụng awk là dễ nhất khi các $1,$2,...trường đã chứa các chuỗi chính xác mà bạn muốn làm việc. Dấu tách trường, nếu nó chứa nhiều hơn một ký tự, được hiểu là một biểu thức chính quy. Chúng tôi không cần thực hiện bất kỳ thao tác tìm kiếm và thay thế hoặc chuỗi con nào để thoát khỏi {dấu ngoặc nhọn}. Chúng tôi chỉ tính chúng là một phần của dấu phân cách.

awk -F'[ {}]+' '{printf("-%s %s + %s ;\n", $2, $5, $4)}'

Sử dụng printfthay vì printcũng giúp dễ dàng hơn một chút để xem chuỗi sẽ được định dạng như thế nào, nhưng nếu bạn muốn có print "-"$2,$5" + "$4";"thay thế printf("-%s %s + %s ;\n", $2, $5, $4), đó là một tùy chọn.