Foro - Perl en Español

Hola a todos:
He comenzado a trabajar en este mundo de expresiones regulares.
A modo de ejercicio estoy haciendo un parser de XML. Sé que hay módulos como XML:DOM, etc, pero la idea es entender cómo se hace.
Llegue a lo siguiente:

sub getElementsByTagName($) {
my $_nodeName=shift;
my $_attributes = '';
my $_innerNode='.*';
my $_endNode="+((\/>)|(>$_innerNode<\/$_nodeName>))";
my $_i=0;
my @_aResul;
while ($_xml =~s/<$_nodeName $_attributes$_endNode/NODE$_i/i) {
push @_aResul,$&;
$i++
}
return @_aResul;
}

Ahora bien, si el ...

Hola todos:

Después de una temporada muy ocupada de mi vida, estoy ahora de regreso. Realmente me emociona ver que la cantidad de usuarios en el foro de Perl en Español ha subido, y la participación dentro de él también ha estado cada día mejor.

Me estoy poniendo a escribir un nuevo tutorial para el sitio de Perl en Español, y quiero iniciar unos nuevos proyectos para el sitio de Perl en Español.

Les agradecería ...

Hola, tengo un problema al pasar parámetros en la llamada a un método.

Tengo algo así: en primer lugar una clase con este aspecto:
#!/usr/bin/env perl
package control;

use strict;
use warnings;
use FicheroCont;

sub new{

my $clase =shift;
my $self ={};

$self->{fcont} = FicheroCont->new();

bless ($self,$clase);
return $self;

}

sub opera{

my $self = shift;
$fcont->operacion("3");
return;

}

1;
En la clase FicheroCont tenemos lo siguiente:
#!/usr/bin/env perl
package FicheroCont;
use strict;
use warnings; ...

Hola necesito redireccion desde un cgi de Perl a distintas páginas dentro de mi mismo server por ejemplo

if($row_verifica ne "") {
##llamar una pagina
}else{
##llama otro pagina
}

es sencillo pero busque y lo único que encontré es haciendo un link pero yo lo quiero hacer automáticamente.

Tal vez me echan una mano.
bye

Hola a todos,

El caso es que estoy intentando leer un fichero y guardar la información en un hash.
El formato del fichero es el siguiente:

# Config file for automated ftp transfer


#Environment:NT
NT_user = pepito
NT_password = djsjjsj
NT_host = www.pepitolandia.net

#path1, report/s
NT_path = /amparito/pepito/Inputs/
NT_ReportList = (PEPE MANOLO AMPARO JOSE JUAN)

...

#Environment:MVS
MVS_user = cocouaua
MVS_password = pozi
MVS_host = pepito.mecome.lafruta

#path1, report/s
MVS_path ...

Hola, estoy usando una expresión como:
@vecfile = <FD>;

Para leer un archivo y ponérselo a un vector, pero quiero hacer que esto sea más óptimo, quiero leer el archivo desde C y pasarle los datos a un vector Perl.
Mi pregunta es: ¿Como gestiono un vector Perl desde C?
Si conocen una forma de hacer estos guardados eficientemente (lo mas rápido posible) estoy abierto a nuevas ideas.
Agradezco de antemano su colaboración.

Hola, me encuentro con que tengo que guardar datos en disco que están en un hash de forma masiva.
He probado los tie y no me dan los tiempos que necesito, me gustaría usar el lenguaje C para poder guardar el hash, necesito que me ayuden porque no sé cómo usar C en Perl y no sé cómo hacer que C entienda un hash.
Si conocen una forma de hacer estos guardados eficientemente (lo mas ...

Hola, tengo un problema al abrir o crear un archivo. Si pongo la ruta absoluta, funciona correctamente:

Code: Seleccionar todo

my $fh = FileHandle->new();

if (!($fh->open("+>/home/david/datos/fichero.dat")))
{
      print("Fallo al crear el fichero\n");
        $fh=undef;
    }else{
        print "DEBUG: fichero abierto con éxito\n";
        $fh->autoflush(1);
    }



Pero si pongo la ruta relativa al directorio local, no funciona:



my $fh = FileHandle->new();

if (!($fh->open("+>./datos/fichero.dat")))
{
print("Fallo al crear el fichero\n");
$fh=undef;
}else{
print "DEBUG: fichero abierto con éxito\n";
$fh->autoflush(1);
} ...

A ver si a alguien le ha pasado algo como a mi.
Resulta que en un programa tengo que grabar un archivo txt que posteriormente lo proceso secuencialmente, eso lo estoy haciendo con:

system "dir *.* /B >files.txt";

Esta instrucción cuando la ejecuto dentro del Perl Express me funciona correctamente, pero cuando lo quiero hacer en el Internet Explorer pues simplemente no me graba nada.
Yo creo que es asunto de la seguridad del Sistema ...

Hola a todos!!

Requiero de conocimiento :D, resulta que tengo un script que cuando quiero abrir una aplicación que me solicita un usuario y un pwd y no me permite seguir con el script hasta que cierro la apliación, ya utilice system (aplicación) y exec (aplicacion) pero en los dos casos no me regresa al script una vez ejecutado el comando. Alguna idea??

Saludos