while(@lines1 > 0 and @lines2 > 0) {
    last if shift(@lines1) ne shift(@lines2);
}
print "*\n" if @lines1 > 0 or @lines2 > 0;