+----------------------+------ embedded Perl code | | v v (?(?{ $run[-1] - $run[-2] != 1 }) (*F))