นิพจน์ทั่วไปของ Perl

นิพจน์ทั่วไป (นิพจน์ทั่วไป) อธิบายรูปแบบการจับคู่สตริง ซึ่งสามารถใช้เพื่อตรวจสอบว่าสตริงมีสตริงย่อยบางรายการ แทนที่สตริงย่อยที่ตรงกัน หรือแยกสตริงย่อยที่ตรงตามเงื่อนไขบางอย่างจากสตริงบางตัว

ฟังก์ชันนิพจน์ทั่วไปของภาษา Perl นั้นทรงพลังมาก โดยพื้นฐานแล้วเป็นภาษาที่ทรงพลังที่สุดในบรรดาภาษาที่ใช้กันทั่วไป หลายภาษาอ้างถึงนิพจน์ทั่วไปของ Perl เมื่อออกแบบการรองรับนิพจน์ทั่วไป

นิพจน์ทั่วไปของ Perl มีสามรูปแบบ ได้แก่ การจับคู่ การแทนที่ และการแปลง:

การจับคู่: ม./ / (เรียกย่อว่า / /, ละเว้น ม.)

การแทนที่: s/ - -

การแปลงค่า: tr/ - -

โดยทั่วไปทั้งสามรูปแบบจะใช้กับ =~ หรือ !~ , =~ หมายถึงการจับคู่ !~ หมายถึงไม่ตรงกัน

โอเปอเรเตอร์การแข่งขัน

ตัวดำเนินการจับคู่ m// ใช้เพื่อจับคู่คำสั่งสตริงหรือนิพจน์ทั่วไป ตัวอย่างเช่น หากต้องการจับคู่ "run" ในสเกลาร์ $bar โค้ดจะเป็นดังนี้:

ตัวอย่าง

เมื่อรันโปรแกรมข้างต้น ผลลัพธ์ที่ได้คือ:

 นัดแรก นัดสอง

ตัวแก้ไขการจับคู่รูปแบบ

การจับคู่รูปแบบมีตัวแก้ไขที่ใช้กันทั่วไป ดังที่แสดงในตารางต่อไปนี้:

ตัวแปรนิพจน์ทั่วไป

หลังจากประมวลผล Perl แล้ว จะมีชื่อตัวแปรพิเศษสามชื่อสำหรับค่าที่ตรงกัน:

$`: ส่วนก่อนหน้าของสตริงที่ตรงกัน

$&: สตริงที่ตรงกัน

$': ยังไม่มีสตริงที่เหลืออยู่ที่ตรงกัน

หากคุณรวมตัวแปรทั้งสามนี้เข้าด้วยกัน คุณจะได้สตริงดั้งเดิม

ตัวอย่างมีดังนี้:

ตัวอย่าง

ผลลัพธ์ของการรันโปรแกรมข้างต้นคือ:

 สตริงก่อนการจับคู่: ยินดีต้อนรับสู่สตริงก่อนการจับคู่: เรียกใช้สตริงหลังจากการจับคู่: oob site

ผู้ดำเนินการทดแทน

ตัวดำเนินการแทนที่ s/// เป็นส่วนขยายของตัวดำเนินการที่ตรงกันและแทนที่สตริงที่ระบุด้วยสตริงใหม่ รูปแบบพื้นฐานมีดังนี้:

 s/รูปแบบ/การเปลี่ยน/;

PATTERN คือรูปแบบที่ตรงกัน REPLACEMENT คือสตริงการแทนที่

ตัวอย่างเช่น เราแทนที่ "google" ในสตริงต่อไปนี้ด้วย "codercto":

ตัวอย่าง

ผลลัพธ์ของการรันโปรแกรมข้างต้นคือ:

 ยินดีต้อนรับสู่เว็บไซต์ codercto

แทนที่ตัวแก้ไขการทำงาน

ตัวแก้ไขการดำเนินการทดแทนจะแสดงอยู่ในตารางต่อไปนี้:

ตัวดำเนินการแปลง

ต่อไปนี้คือตัวแก้ไขที่เกี่ยวข้องกับตัวดำเนินการแปลง:

ตัวอย่างต่อไปนี้จะแปลงอักษรตัวพิมพ์เล็กทั้งหมดในตัวแปร $string ให้เป็นตัวพิมพ์ใหญ่:

 #!/usr/bin/perl $string = 'ยินดีต้อนรับสู่ไซต์ codercto';$string =~ tr/az/Az/;print "$stringn";

ผลลัพธ์ของการรันโปรแกรมข้างต้นคือ:

 ยินดีต้อนรับสู่เว็บไซต์ CODERCTO

ตัวอย่างต่อไปนี้ใช้ /s เพื่อลบอักขระที่ซ้ำกันออกจากตัวแปร $string:

ตัวอย่าง

ผลลัพธ์ของการรันโปรแกรมข้างต้นคือ:

 รูน็อบ

ตัวอย่างเพิ่มเติม:

 $string =~ tr/d/ /c; # แทนที่อักขระที่ไม่ใช่ตัวเลขทั้งหมดด้วยช่องว่าง $string =~ tr/t //d; # ลบแท็บและช่องว่าง $string =~ tr/0-9/ /cs # แทนที่อักขระอื่นระหว่างตัวเลขด้วยการเว้นวรรค

กฎการแสดงออกปกติเพิ่มเติม