$line =~ s/$regexp/$substitute/ee;