$regex = "href\\s*=\\s*\".*?\""; $regex = 'href\s*=\s*".*?"'; #### use strict; use warnings qw( FATAL all ); my $regex = 'href\s*=\s*".*?"'; print "regex = $regex\n"; foreach my $line () { chomp($line); while ($line =~ /$regex/) { my $match = $&; $line =~ s/$match/xxx/; } } __DATA__ No anchors here go there go here