Select Code to Download

while ( defined( my $log_line = $bw->readline() ) ) {
    my ($logTime) = ($log_line =~ /^(\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{
+2}).*ProcessHTTPRequestImpl/);
...
      print $log_line;
    }
}

next if $log_line =~ /^$/;