( $#ar1 == $#ar2 )
    and ( $ar1[$_] eq $ar2[$_] ) || 0 || last
        for ( 0 .. $#ar1 );