Hola.
Me gustaría ejecutar una serie de comandos durante el funcionamiento de mi programa en Perl. Usando el comando 'system' he obtenido buenos resultados. Por ejemplo:
#!/bin/perl
system (ifconfig);
Ahora bien, si lo que yo quiero es ejecutar un comando que todavía no conozco no me funciona. Veamos otro sencillo ejemplo:
#!/bin/perl
$comando = ifconfig;
system ($comando);
$argumento = Modo1
system (/home/user/seleccion $argumento)
Lo que no sé es como debo ejecutar comandos que tenga almacenados ...
-
- Publicidad
Fecha actual 2024-11-25 17:26 @768
News of Mundo Perl
Site map of Mundo Perl » Foro : Mundo Perl
Ejecución de comandos en Perl
Read more : Ejecución de comandos en Perl | Vistas : 4276 | Respuestas : 11 | Foro : Intermedio
Problemas con un hash
Hola a todos,
A ver si alguien me ayuda pues tengo ya la cabeza como un chorizo de cantimpalos:
Tengo un hash determinado con información en su interior organizada tal y como sigue:
%Summary =
( 'AAAAcontador1' => 333,
'BBBBcontador3' => 344,
'AAAAHash' => { #otro hash con mas hashes en su interior
}
'CCCCcontador5' => 566,
'AAAAcontador3' =>32,
'BBBBHash' => ....
)
Osea, tenemos para AAAA (que es un identificador), una serie de contadores, ...
A ver si alguien me ayuda pues tengo ya la cabeza como un chorizo de cantimpalos:
Tengo un hash determinado con información en su interior organizada tal y como sigue:
%Summary =
( 'AAAAcontador1' => 333,
'BBBBcontador3' => 344,
'AAAAHash' => { #otro hash con mas hashes en su interior
}
'CCCCcontador5' => 566,
'AAAAcontador3' =>32,
'BBBBHash' => ....
)
Osea, tenemos para AAAA (que es un identificador), una serie de contadores, ...
Read more : Problemas con un hash | Vistas : 1698 | Respuestas : 5 | Foro : Básico
Problemas en cgi
Tengo un cgi que desde la linea de comandos se ejecuta perfectamente, pero cuando lo llamo desde un web form pasandole los parametros me devuelve un error. El código del web form:
<html>
<form action="../perl/blog.pl" method="POST">
NickName: <input type="text" name="nick"><br>
Email: <input type="text" name="email"><br>
Titulo: <input type="text" name="titulo"><br>
Asunto: <input type="text" name="asunto"><br>
Comments:<br>
<textarea name="comentario" rows="5"
cols="80"></textarea>
<br>
<input type="submit" value="Enviar al blog.">
</form>
</html>
El código del cgi:
# codigo creado por Legolas.
# ...
<html>
<form action="../perl/blog.pl" method="POST">
NickName: <input type="text" name="nick"><br>
Email: <input type="text" name="email"><br>
Titulo: <input type="text" name="titulo"><br>
Asunto: <input type="text" name="asunto"><br>
Comments:<br>
<textarea name="comentario" rows="5"
cols="80"></textarea>
<br>
<input type="submit" value="Enviar al blog.">
</form>
</html>
El código del cgi:
# codigo creado por Legolas.
# ...
Read more : Problemas en cgi | Vistas : 1592 | Respuestas : 1 | Foro : Web
Formatear texto de salida
Tengo el siguiente problema. Necesito imprimir en pantalla cierta información, pero dependiendo del tamaño de la ventana (consola linux), de manera que la información no quede en dos líneas, sino que al llegar al extremo de la terminal, se corte.
¿ es posible ?
¿ es posible ?
Read more : Formatear texto de salida | Vistas : 1277 | Respuestas : 4 | Foro : Intermedio
Ejecutar scripts de Perl desde una página web
Estimados :D ,
Necesito ejecutar dos scripts que tengo hechos en Perl desde una página web. La idea es ejecutarlo desde una simple página web en donde se tenga que loguear un usuario previamente. Y que al hacer un click sobre el botón 1 se ejecute el determinado script_1 y lo mismo con el 2.
¿¿¿ Alguien ya lo ha realizado ??? ¿Tienen algún modelo de ...
Necesito ejecutar dos scripts que tengo hechos en Perl desde una página web. La idea es ejecutarlo desde una simple página web en donde se tenga que loguear un usuario previamente. Y que al hacer un click sobre el botón 1 se ejecute el determinado script_1 y lo mismo con el 2.
¿¿¿ Alguien ya lo ha realizado ??? ¿Tienen algún modelo de ...
Read more : Ejecutar scripts de Perl desde una página web | Vistas : 15610 | Respuestas : 28 | Foro : Web
Duda con Expresión Regular
Hola a todos,
Dado un string (por ejemplo "ELPREPOFFxmlValidLines") necesito recuperar únicamente las primeras letras mayúsculas de dicho string, ignorando el resto una vez encontrada la primera minúscula.
En el ejemplo anterior, necesitaría recuperar únicamente "ELPREPOFF" y guardarlo en una variable.
¿Existe algún método sencillo usando expresiones regulares?
¡¡¡Gracias por adelantado!!!
Dado un string (por ejemplo "ELPREPOFFxmlValidLines") necesito recuperar únicamente las primeras letras mayúsculas de dicho string, ignorando el resto una vez encontrada la primera minúscula.
En el ejemplo anterior, necesitaría recuperar únicamente "ELPREPOFF" y guardarlo en una variable.
¿Existe algún método sencillo usando expresiones regulares?
¡¡¡Gracias por adelantado!!!
Read more : Duda con Expresión Regular | Vistas : 841 | Respuestas : 1 | Foro : Básico
Copiar o mover ficheros de una carpeta a otra
Buen día... otro problema de novato....
En mi programa necesito que el usuario ingrese 6 caracteres para crear un directorio. Más adelante en el programa se genera un fichero y lo coloca en esa carpeta creada.
Esto es lo que tengo
print " \f \a Especifique Cliente ( 6 Caracteres ) : \ t"
$cliente=<STDIN>;chop($cliente);
mkdir("$cliente",0755) || die "No se puede crear :$!";
#***En esta linea se genera el fichero y se guarda en X ...
En mi programa necesito que el usuario ingrese 6 caracteres para crear un directorio. Más adelante en el programa se genera un fichero y lo coloca en esa carpeta creada.
Esto es lo que tengo
print " \f \a Especifique Cliente ( 6 Caracteres ) : \ t"
$cliente=<STDIN>;chop($cliente);
mkdir("$cliente",0755) || die "No se puede crear :$!";
#***En esta linea se genera el fichero y se guarda en X ...
Read more : Copiar o mover ficheros de una carpeta a otra | Vistas : 5785 | Respuestas : 5 | Foro : Básico
¿Cómo saber si una variable dada $var es un hash?
Hola a todos.
¿Existe algún método para averiguar si mi variable $var en realidad contiene un hash en su interior?
Algo como:
Muchas gracias
Felipe
¿Existe algún método para averiguar si mi variable $var en realidad contiene un hash en su interior?
Algo como:
- Code: Seleccionar todo
if hash($var)....
Muchas gracias
Felipe
Read more : ¿Cómo saber si una variable dada $var es un hash? | Vistas : 1600 | Respuestas : 7 | Foro : Básico
Mas ssh en perl
¡¡Hola a todos!! He intentado conectarme mediante SSH a otro servidor por FTP pero no he podido. He copiado el ejemplo de CPAN, instalé el modulo pero nada.
#
!/usr/bin/perl
use Net::SSH::Perl;
$host= "laipdelserver";
$user="miusuario";
$pass="xxxxxx";
$cmd="ls -l";
my $ssh = Net::SSH::Perl->new($host);
$ssh->login($user, $pass);
my($stdout, $stderr, $exit) = $ssh->cmd($cmd);
El error que recibo ese el siguiente
#
!/usr/bin/perl
use Net::SSH::Perl;
$host= "laipdelserver";
$user="miusuario";
$pass="xxxxxx";
$cmd="ls -l";
my $ssh = Net::SSH::Perl->new($host);
$ssh->login($user, $pass);
my($stdout, $stderr, $exit) = $ssh->cmd($cmd);
El error que recibo ese el siguiente
Can't locate Math/Pari.pm in @INC (@INC contains: /usr/lib/perl5/5.8.7/i686-linux /usr/lib/perl5/5.8.7 /usr/lib/perl5/site_perl/5.8.7/i686-linux /usr/lib/perl5/site_perl/5.8.7 /usr/lib/perl5/site_perl/5.8.5 /usr/lib/perl5/site_perl/5.8.4 /usr/lib/perl5/site_perl/5.8.3 /usr/lib/perl5/site_perl/5.8.2 /usr/lib/perl5/site_perl/5.8.1 /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl ...
Read more : Mas ssh en perl | Vistas : 1242 | Respuestas : 3 | Foro : Básico
Perl aplicado al SecureCRT
Hola a tod@s.
Esta es mi primera participación en el foro y quería preguntaros si alguien tiene ejemplos de código perl o alguna documentación para escribir scripts en este lenguaje a través del SecureCRT.
Muchas gracias.
Esta es mi primera participación en el foro y quería preguntaros si alguien tiene ejemplos de código perl o alguna documentación para escribir scripts en este lenguaje a través del SecureCRT.
Muchas gracias.
Read more : Perl aplicado al SecureCRT | Vistas : 1931 | Respuestas : 4 | Foro : Básico
Last 10 active topics
Estadísticas
Mensajes totales 36882 • Temas totales 7430 • Usuarios totales 1981