Mega Code Archive

 

Categories / Perl / Regular Expression

 

Ei modifier

$_ = "knock knock, who is there.\n"; s/knock/"knock, " x 2 . "knocking"/ei; print "He's $_;