use strict; use warnings; while () { print "extra line\n" if m{}; print; } __DATA__ sl1 this is my line sl2 justanotherline