$cur = $r->[1] unless $cur > $r->[1];

##</code><code>##

@array = (
    [ '00:00', '24:00' ],
    [ '01:00', '02:00' ]
);