• Publicidad

Monitor de programas

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Monitor de programas

Notapor sark2048 » 2012-08-16 12:47 @574

Hola. Me encuentro en un dilema, ya que ya puedo conectarme remotamente con el módulo OpenSSH, haciendo referencia a la visualización de un archivo mediante ls -l "archivo".

Lo que sucede es que quiero validar que exista ese archivo, pienso yo que haciendo una comparación de cadenas, pero lo que me arroja el módulo de Perl mediante un while() es esto:

while(<$rout>){
print
}close $rout;

Lo que manda rout es lo que genera el comando de shell ls -l del archivo. O sea:

ls : no puede acceder al archivo /../../programa: No exíste el fichero ni el directorio.

En resumen, tengo que verificar que se encuentre dentro de /usr/sbin/"programa", pero con el módulo de Perl logro ver lo que manda el ls, pero no sé cómo comparar eso con una cadena que yo tengo en mi equipo.
sark2048
Perlero Nuevo
Perlero Nuevo
 
Mensajes: 1
Registrado: 2012-08-16 12:29 @562

Publicidad

Re: Monitor de programas

Notapor explorer » 2012-08-16 14:57 @664

Bienvenido a los foros de Perl en Español, sark2048.

Lo que puedes hacer es guardar lo que recibes en una variable escalar:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my @rout = <$rout>;
  2. my $ls = join '', @rout;
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4


O así:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. local $/;
  2. my $ls = <$rout>;
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4


Y luego ya puedes buscar lo que necesites, con index(), rindex() o un patrón de expresión regular.
JF^D Perl Programming Language
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 12852
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados