tools/resolve_live_check.pl

   1 while (<>)
   2 {
   3         chomp;
   4         s/Accept\(a\) Edit\(e\) Diff\(d\) Merge \(m\) Skip\(s\) Help\(\?\) at: //;
   5         if (/[1-9][0-9]* yours/ || /[1-9][0-9]* conflicting/)
   6         {
   7                 print $last, "\n", $_, "\n", "\n";
   8         }
   9         $last = $_;
  10 }