in reply to Search and add lines into a file. Getting bareword error.

I guess this would fulfill your requirments hopefully... 

while(<FILE>)
{
  if( $_ =~ /^lvtnfet/){
     print FH $_;
     print FH NewLine;
     print FH NewLine;
   }
   else{
    print FH $_;
    }
}

[download]

In Section Seekers of Perl Wisdom