Foro - Perl en Español

Hola.

¿Se os ocurre alguna forma de conocer qué ficheros están en uso y que ficheros no?
Para Windows.

Muchas gracias.

Un saludo,
Ricar.

Estoy seguro que llamando a la API de Windows, con Win32::API, se puede saber, pero lo que he encontrado es usar una herramienta intermedia, llamada nthandle, pero es muy posible que en la página de Sysinternals encuentres una herramienta mucho más moderna.

Hola explorer.

Probaré, puesto que me da un error al hacer un binmode() del fichero que está en uso y el programa no continua.

Voy a ver si encuentro una solución más ideal y si no utilizaré una aplicación externa, como la que comentas.

Muchas gracias por la respuesta.

Un saludo,
Ricar.

Edito: He resuelto el problema con la instrucción anterior open():

De esta forma, binmode() no da error porque no intenta hacer nada sobre los fichero que están en uso.

En otras palabras... que HAY que hacer lo que SIEMPRE hay que hacer cuando intentamos abrir un fichero: comprobar si la instrucción open() ha tenido éxito o no. Y si no lo tiene, sabemos que en $! Perl nos dirá el porqué ha fallado.

Puedes poner el código dentro de una instrucción eval(), y de esa manera el usuario no verá nada extraño en pantalla, y podremos controlar qué hacer en caso de que algo vaya mal (en $@ estará almacenado el texto del error).

Más información perldoc perlopentut.