Re^2: trouble with regular expressions

[programmer.perl]

in reply to Re: trouble with regular expressions
in thread trouble with regular expressions

I want to change this whole word to //eof

my old code matches the ;doc and gives result such as ssscument.write('<iframe ...shortened...</iframe>');

and thank you for your reply ))

[programmer.perl]

sorry, I made a gram. mistake: I want to change this whole string to //eof

[moritz]

my old code matches the ;doc and gives result such as ssscument.write('<iframe ...shortened...</iframe>');

No, it does not:

use 5.010;
use strict;
use warnings;

$_ = q[;document.write('<iframe src="any url" scrolling="auto" framebo
+rder="no" align="center" height="15" width="15"></iframe>');];
s/(\;do.*)(\<\/iframe\>\'\)\;)/sss/;
say
__END__
sss

Anyway, it's easier if you use a different delimiter so that you don't have to escape the forward slashes:

s{(\;do.*)(</iframe>'\);)}{//eof};