27:       if ($3 eq "\|") {
28:          push @{ $order[-1] },"\t$2\t$1\t$4\tDiff: " . abs($1 - $4) . "\n";
29:       }