Làm cách nào để thoát khỏi các ký tự đặc biệt trong một chuỗi mà tôi nội suy thành một regex Perl?

Question

Tôi có một chuỗi có thể chứa các ký tự đặc biệt như: $, (, @, #, vv Tôi cần có thể thực hiện cụm từ thông dụng trên chuỗi đó.

Ngay bây giờ nếu chuỗi của tôi có bất kỳ ký tự nào trong số các ký tự này thì regex có vẻ vỡ vì đây là các ký tự dành riêng cho regex.

Không ai biết một chương trình con tốt mà có thể thoát khỏi độc đáo bất kỳ của những nhân vật này đối với tôi để sau này tôi có thể làm một cái gì đó như:

$p_id =~ /^$key/ 

Answer 1

$p_id =~ /^\Q$key\E/; 

Answer 2

Từ mô tả của bạn, có vẻ như bạn có nó ngược . Bạn không cần phải thoát khỏi các ký tự trên chuỗi bạn đang đối sánh trên ($ p_id), bạn cần phải thoát khỏi chuỗi kết hợp của bạn '^ $ key'.

Given:

$p_id = '$key$^%*&#@^&%$blah!!'; 

Sử dụng:

$p_id =~ /^\$key/; 

hoặc

$p_id =~ /^\Q$key\E/; 

Các \ Q, \ E cặp đối xử với tất cả mọi thứ ở giữa là chữ. Nói cách khác, bạn không muốn tìm nội dung của biến $ key, nhưng chuỗi thực tế '$ key'. Ví dụ đầu tiên chỉ đơn giản là thoát khỏi $.