Did you run it? (Change "$_ =~" to "$_ = q~" first.) It may not do what you want, but contrary to what you claim, it doesn't touch the second line. (Note the /^/m)