Perl tương đương với preg_callback của PHP

Question

Chúng ta có tương đương preg_callback trong Perl không?

Cho phép nói rằng tôi muốn khớp thứ gì đó và thay thế bằng giá trị trả lại của hàm được gọi với điều phù hợp.

Answer 1

Sử dụng s///e - công cụ sửa đổi đánh giá và bạn có thể đặt mã perl tùy ý trong phần thứ hai.

$x = "this is a test"; 
$x =~ s/(test)/reverse($1)/eg; 
print $x; 

//this is a tset 

ref: http://perldoc.perl.org/perlretut.html#Search-and-replace