Foro - Perl en Español

Hola , he estado leyendo mucho sobre el tema pero no consigo nada, la verdad.
Lo que intento hacer es lo siguiente: lanzar un ping a una maquina Windows y otra Linux. Hasta aquí bien, ahora llega mi duda: una vez que contesten tengo que leer un archivo.txt.

No sé cómo acceder a carpetas compartidas. Si alguien me puede ayudar, muchas gracias.

Gracias por responder tan pronto.
Perfecto pero ese vale para windows tambien?
Muchisimas gracias.

es decir carpetas compartidas en servidores windows?

Muchas gracias parece una buena solucion.
esta instruccion seria la correcta ?

system("net use t: \\\$server\\d$");

y cuando termine de ejecutarse el script como quitaria esa unidad de red?
Gracias.

Gracias lo he conseguido así:

Código: Seleccionar todo

system('net use t: \\\151.184.134.67\\usmt');
.........
system('net use t: /DELETE');

pero me devuelve que el comando se ha realizado correctamente por pantalla. ¿Cómo redirecciono lo que me devuelve el sistema a algún sitio para que no me lo saque por pantalla?

Gracias....

Listo, lo he hecho así:

Código: Seleccionar todo

system(('net use t: /DELETE')>\null);

y ya no lo muestra por pantalla. Me está empezando a enganchar el Perl, jeje. Muchas gracias. Si tengo más dudas más adelante sino te importa te preguntaré. Gracias de nuevo.

Estoy intentando utilizar el comando Net Use desde Perl combinándolo con una variable,



Sin embargo, de este modo no me funciona. ¿Qué debo hacer para hacer esto genérico y poder emplear variables antes de pasar el comando?