¡Hola! Soy bastante nueva en Perl y la verdad no me manejo mucho y tengo un problema. No sé si alguien tiene una idea para ayudarme.
El asunto es que tengo un archivo de este tipo: (las columnas dos y tres son coordenadas)
Using text Syntax Highlighting
nombre1 1 10
nombre1 25 30
nombre1 45 76
nombre2 12 23
nombre2 38 72
nombre2 145 158
nombre2 163 181
nombre2 176 184
nombre3 26 38
nombre3 42 75
nombre4 62 89
nombre4 104 195
nombre4 132 158
nombre4 165 201
nombre5 10 45
nombre5 163 189
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
Y necesito que si la línea
i con la siguiente tienen el mismo nombre y la diferencia entre las columnas 2 de la línea
i y la siguiente es menor que 50 contabilice y guarde el nombre y columna 2 de
i y continúe comparando hasta que la diferencia sea mayor que 50 o los nombres sean distintos y guarde la columna 3 de la última linea en la que se cumplían las condiciones.
Para este caso una salida de este tipo:
Using text Syntax Highlighting
nombre1 1 76 n=3
nombre2 12 72 n=2
nombre2 145 184 n=3
nombre4 104 201 n=3
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
) con el código base que ya tienes, que por cierto hay algunos errores.
