Foro - Perl en Español

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.

Desde un ordenador local accedo a un servidor de linux en el que esta el cgi a ejecutar. Mi pregunta es si alguien conoce algún método para conseguir ejecutar desde dicho servidor un programa que ya exista en el ordenador local. He probado con system pero no es útil porque la ruta del pc local no se reconoce desde el servidor (c:\...).

Traducción de POD en 5 minutos, por Hue-Bond.

Code: Seleccionar todo

$socket= new IO::Socket::INET (
                PeerAddr=>"$target:$port",
                Proto=>'tcp',
                Timeout=>'1' ); # Timeout.

Hola todos:

Con la buena noticia de que ya se va a impartir el primer tutorial interactivo de Perl en Español.

Como lo había dicho, el primer tutorial será acerca de Perl Básico y estará dividido en tres sesiones de una hora y media más o menos cada una.


========

Perl Básico - Sesión 1

Expositor: Uriel Lizama

Fecha y Hora: Miércoles 5 de Julio del 2006 a las 17:00 horas (Cd. de México GMT: ...