สถานการณ์การแยกข้อความนี้เป็นไปได้ใน linux bash shell หรือไม่

บิล เมอร์เรย์ ‹- วันกราวด์ฮอก ‹- grep พร้อมโหมด Perl Magic

ค่อนข้างยุ่งยาก แต่คุณสามารถใช้สิ่งนี้:

grep -P "(?sm)^\S+[^:\r\n]*?(?=\s*:(?:(?!^\S).)*?Groundhog Day)" mymoviefile

ดูการสาธิต

• -P เปิดใช้งานโหมด Perl
• (?sm) เปิดตัวดัดแปลงสองโหมด:
• s เปิดใช้งานโหมด DOTALL ช่วยให้จุดตรงกันข้ามเส้น
• m เปิดโหมดหลายบรรทัด โดยอนุญาตให้ ^ และ $ ตรงกันในแต่ละบรรทัด
• จุดยึด ^ ยืนยันว่าเราอยู่ที่จุดเริ่มต้นของบรรทัด
• \S+ จับคู่อักขระที่ไม่ใช่ช่องว่างตั้งแต่หนึ่งตัวขึ้นไป
• [^:\r\n]*? จับคู่ตัวอักษรที่ไม่ใช่โคลอนหรือขึ้นบรรทัดใหม่อย่างเกียจคร้าน สูงสุด ...
• จุดที่ lookahead (?=\s*:(?:(?!^\S).)*?Groundhog Day) สามารถยืนยันได้โดยไม่ต้องใช้ตัวอักษรว่าสิ่งที่ตามมาคือ...
• \s*: ช่องว่างเพิ่มเติมและเครื่องหมายโคลอน
• จากนั้น (?:(?!^\S).)* มีอักขระเป็นศูนย์หรือมากกว่านั้นที่ไม่ใช่อักขระเว้นวรรคที่จุดเริ่มต้นของบรรทัด จับคู่อย่างเกียจคร้านจนถึง...
• Groundhog Day ชื่อหนัง!

ข้อมูลอ้างอิง

• Lookahead และ Lookbehind การยืนยันความยาวเป็นศูนย์
• การเรียนรู้ Lookahead และ Lookbehind

ฉันจะทำมันด้วย awk ถ้าฉันเข้าใจปัญหาถูกต้อง:

 awk -F: -v s="$search" '$1~/\S/{p=$1}$2~s{print $1 FS $2}' file

ทดสอบด้วย movie 3:

kent$ cat f
Person1 : movie1
          : movie 2
          : movie 3
          : movie 4

ในไฟล์ด้านบนมีช่องว่าง/แท็บนำหน้า

kent$  awk -F: -v s="movie 3" '$1~/\S/{p=$1}$2~s{print p FS $2}' f
Person1 : movie 3

สิ่งนี้อาจใช้ได้ผลสำหรับคุณ (GNU sed):

sed -n '/^\S/h;/movie 3/{H;x;s/:.*:/:/p}' file

ใช้สวิตช์ -n เพื่อให้ grep เป็นธรรมชาติ บันทึกบุคคลนั้นไว้ในพื้นที่พักและเพิ่มภาพยนตร์ต่อท้าย จากนั้นลบข้อความที่ไม่ต้องการออกแล้วพิมพ์ออกมา

สิ่งนี้ค่อนข้างคลุมเครือ แต่ทำงานให้เสร็จ:

awk '/^[^ ]/{p=0} /Person1/{p=1} p'

ตัวอย่าง:

ไฟล์อินพุต:

Person1 : movie1
    : movie 2
    : movie 3
    : movie 4
Person2 : movie 5
    : movie 6

การดำเนินการ:

awk '/^[^ ]/{p=0} /Person1/{p=1} p' file
Person1 : movie1
    : movie 2
    : movie 3
    : movie 4

awk '/^[^ ]/{p=0} /Person2/{p=1} p' file
Person2 : movie 5
    : movie 6

OBS: ในบรรทัดคำสั่ง เอาต์พุตจะถูกเยื้อง

คำอธิบาย:

1. หากบรรทัดไม่ได้ขึ้นต้นด้วยช่องว่าง ให้ตั้งค่า p=0
2. หากบรรทัดมี Person1 ให้ตั้งค่า p=1
3. ถ้า p=1 ให้พิมพ์ (ส่วนนี้ไม่ชัดเจน)

สามารถทำได้ใน perl เช่นกัน:

perl -ne '/^\w+/ && {$p=0}; /Person1/ && {$p=1}; $p && {print}'