while(defined( my $log_line = $bw->readline ) ) {
  if ($log_line =~ /GET \/myapp\//) {
    $last_line = $log_line;
    last;
  }
}
$bw->close();