Dấu chấm phẩy Perl ở cuối câu lệnh

Question

; được sử dụng làm dấu phân cách lệnh, do đó, đặt nhiều ; vào cuối câu lệnh là tốt vì nó chỉ thêm câu lệnh trống.

Tôi đã xem qua mã này trong đó có nhiều ; ở cuối nhưng xóa chúng gây ra lỗi:

$line =~s;[.,]$;;; 

nên giống như

$line =~s;[.,;]$; 

nhưng nó không phải là. Chuyện gì vậy?

Answer 1

Trong code của bạn chỉ cuối cùng ; là tuyên bố delimiter. Những người khác là regex delimiters mà toán tử thay thế mất. Một cách tốt hơn để viết những dòng này là:

$line =~s/[.,]$//; 

Vì bạn phải có dấu phân cách tuyên bố và delimiters regex trong tuyên bố của bạn, bạn không thể bỏ sót bất kỳ các dấu ;

Answer 2

trong đoạn mã do bạn cung cấp ; được sử dụng làm dấu phân tách cho cụm từ thông dụng tìm kiếm-thay thế.

$line =~s;[.,]$;;; 

tương đương với

$line =~ s/[.,]$//; 

Answer 3

Một dấu chấm phẩy không phải là phổ biến một tuyên bố dấu tách; nó cũng có thể là một chuỗi trích dẫn hoặc dấu phân cách regex. Hoặc thậm chí là một tên biến, như trong JAPH cổ điển này bởi Abigail, có tựa đề "Mọi thứ không phải là những gì họ có vẻ như."

$;        # A lone dollar? 
=$";       # Pod? 
$;        # The return of the lone dollar? 
{Just=>another=>Perl=>Hacker=>} # Bare block? 
=$/;       # More pod? 
print%;       # No right operand for %?