Select Code to Download

while (<$fh>)
{
...
      push ( @lines, filterLog($_) );
   }
}

push @lines, grep { /Running|Dump|FromCB|Update/o && filterLog($_) } <
+$fh>;