Foro - Perl en Español

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

Hola Amigos :

¿ Alguien me puede dar un tip para poder enviar un archivo XML, por medio de un post con header "text/xml" para que lo reciba otro script ?

Saludos,

Caribesoft

Actualmente nuestra organización tiene varias aplicaciones en PHP se quiere desarrollar una aplicación basada en Perl para administrar y accesar a estas aplicaciones existentes en PHP desde esta aplicación central basada en Perl; la incógnita que tenemos actualmente es cómo pasar variables de sesión desde Perl a estas aplicaciones en PHP para que estas funcionen normalmente como si se fueran acceso directamente desde ellas; ¿eso es posible utilizando Apache ?

Hola a todos,

Tengo una duda muy básica sobre llamadas a subrutinas con un array pasado como parámetro de entrada:


He aquí la subrutina:

# Removes the repeated Family Instances in the array
sub removeRepeatedFamilyInstances {

my @families = $_;

my %seen = ();
@families = grep { ! $seen{ $_ }++ } @families;

return @families;
}

Y he aqui la llamada a la subrutina:

#removes repeated instances of a same family
@availableFamilies = &removeRepeatedFamilyInstances(@availableFamilies); ...

Hola a todos.
Estoy haciendo una aplicación en la que tengo que cambiarme de carpeta para leer varios archivos y no me esta funcionando.
Estoy trabajando en Windows XP y uso el IE 6.0
He tratado con,
system "cd $carpeta";

y con,
chdir "$carpeta";
Y no me cambia de directorio y me arroja los resultados del actual directorio de trabajo.
¿¿¿¿¿¿Alguien sabe de alguna otra forma de hacer esto??????
Gracias por su tiempo.

Debo aclarar ...