Foro - Perl en Español

Hola todos:

La primera sesión del tutorial Perl Básico fue un éxito, así que ya estamos listos para la siguiente sesión.


========

Perl Básico - Sesión 2

Expositor: Uriel Lizama

Lugar: irc.freenode.net Channel:#perlenespanol

Fecha y Hora: Lunes 10 de Julio del 2006

A continuación les pongo la hora en que se va a impartir el tutorial de acuerdo a cada ciudad:


GMT: 21:00
Buenos Aires 18:00
Asuncion 17:00
Bahia 18:00
Bogota 16:00
Caracas 17:00 ...

Hola...............estamos desarrollando un proyecto de gestion y administracion de redes en linux, y para hacer consultas en la red y obtener estadisticas necesitamos trabajar con perl e instalar mrtg, hemos bajado el mrtg pero no sabemos como ejecutarlo desde consola linux (red hat), si alguien podria ayudarnos al respecto se lo agradecemos :cry: :(

Hola a todos...
Me estoy iniciando en Perl asi que me disculpen preguntas un poco evidentes....

Estoy creando un fichero texto pero no se como insertar texto con comillas... dentro del fichero quisiera insertar lo siguiente

cualquier cosa "otra cosa" el final.

Esto es lo que hago....

Code: Seleccionar todo

my $salida="1.txt";
open (SALIDA,">$salida") || die "ERROR: No puedo abrir el fichero $salida\n";
print SALIDA "cualquier cosa "otra cosa" el final.";

Por supuesto que no me funciona...

¿¿ ...

Hola a todos...

¿Cómo podría restar dos fechas ??? que el resultado sea en días

¿Cómo podria convertir un timestamp a fecha ??? no necesito las horas, minutos y segundos, solo los días, meses y años...

Gracias por adelantado...

saludos...

lierly

Hola a Todos..

Tengo un sitio web en ASP en un servidor determinado, pero quisiera automatizar algunos procesos usando Perl. Resulta que en una determinada situación quisiera añadirle unas líneas a un fichero que se encuentra en el servidor donde está publicado el sitio web. pero no sé cómo poder acceder desde Perl (que está montado en otro servidor en Linux), sin embargo lo que necesito hacer está implementado vía web.

Si desde el script ...

Saludos.

Estoy usando Class::DBI y quiero utilizar un metodo add_constraint de la siguiente manera:

Code: Seleccionar todo

Telefono::Model::CDBI::Solicitantes->add_constraint('validaestado', estado=>\&check_estado);

sub check_estado{
    my ($valor) = @_;
    return uc($valor) eq 'ACT';
}

El problema que tengo es que, al momento de agregrar o actualizar, al pasarle al campo estado un valor distinto de act (o ACT) retorna falso (o sea check_constraint está funcionando bien) y se genera un error que no he podido capturar y la aplicación finaliza. Lo que ...

Hola:
Soy nuevo en perl y me gustaría hacer lo siguiente:
Dentro del código php, establecer dos opciones:
por un lado, si se pasa un parámetro pasárselo al script .pl. Este parámetro será usado por dicho script.
Por otro lado, no pasar el parámetro, en ese caso se ejecutaría el script sin necesitar el parámetro.

Dentro del código php, estoy utilizando un if/else, pero no se cómo puedes pasar un parámetro a un script .pl. ...

Hola:
Quiero ejecutar el siguiente script de perl (anterior.pl) dentro de código php:

Code: Seleccionar todo

#!/usr/bin/perl
   
use Net::Telnet ();
$username = 'x';
$passwd = 'xy;
$t = new Net::Telnet (Timeout => 60);
$t->open("ip");
$t->login($username, $passwd);
@lines = $t->cmd(fichero.pl");
print @lines;
exit;


Dentro del código php tengo la siguiente función para ejecutarlo pero no se cómo utilizar la función ni nada.

Code: Seleccionar todo

function telnetUpdateACL() {
   $res = system(escapeshellcmd('anterior.pl'),$p);
   return $res;
}


El fichero anterior.pl y el del código php ...

Hola:
Soy nueva en perl y tengo un pequeño problema. Estoy haciendo una función que devuelve un array cuyos elementos son cadenas, y en el programa principal él valor de la función es asignada a otra variable, y uno de los elementos de esa variable(que será de tipo array) es mostrado por pantalla.

Lo que he hecho es algo así:
Dentro de la función:

Code: Seleccionar todo

sub funcion
($valor)=@_;
....
$fich[0]="cero";
$fich[1]="uno";
.....
return $fich

En el programa ...

Traducción de Ámbito de variables en Perl: lo básico, por Hue-Bond.