El caso es que leyendo el contenido de un fichero me gustaría saber si el primer elemento de cada línea de ese fichero es un número (entero). El caso es que necesito saber si es un número, para escribir en el fichero la continuación a ese número. Lo que no sé es comparar eso. Es decir,
Si (Variable == entero) que haga una cosa y sino pues otra. ¿Cómo se hace eso en Perl?
Necesito ayuda, espero que me lo digáis. Muchísimas Gracias.
Sino os queda claro os pongo un ejemplo:
Abro un fichero cualquiera cuyo contenido es
- Código: Seleccionar todo
1 sadsa sadsad
2 sadsad asdsa
3 sadsa sadsad
Lo que quiero hacer es coger el primer elemento de cada línea, y comprobar si es un número, para añadir abajo de esa línea la siguiente:
- Código: Seleccionar todo
4 sadsa asdsad
Si no es un número, por ejemplo, abro un fichero cualquiera cuyo contenido es
- Código: Seleccionar todo
ewqewew wqewqew wqewqee
wqeqwe qwe wqewq wqewqew
wqewqe qweqw wqewqeqwe
La 4ª línea, entonces, debería de ser:
- Código: Seleccionar todo
ewqewew wqewqew wqewqee
wqeqwe qwe wqewq wqewqew
wqewqe qweqw wqewqeqwe
1
¿Cómo puedo hacer esa comprobación? Muchísimas Gracias y espero que me ayudéis.
