perl mecanice infinito desplazamiento con recuento de intentos

while( $mech->infinite_scroll ) {
    # Tests for exiting the loop earlier
    last if $count++ >= 10;
}
Vternal3