Los molesto nuevamente, pero en este caso para consultarles si alguien tiene algún ejemplo para poder cifrar archivos con gnupg (gpg).
Gracias
-
- Publicidad
Fecha actual 2024-11-27 09:27 @436
News of Mundo Perl
Site map of Mundo Perl » Foro : Mundo Perl
Aplicar un comando a todos los archivos de un directorio
Buenas, en este caso les escribo con el fin de consultarles cómo puedo hacer para aplicar un comando sobre todos los archivos de un directorio.
Por ejemplo quiero duplicar los archivos de un directorio.
Tipo,
Gracias
Por ejemplo quiero duplicar los archivos de un directorio.
Tipo,
- Code: Seleccionar todo
cp archivo archivo_copia
Gracias
Read more : Aplicar un comando a todos los archivos de un directorio | Vistas : 837 | Respuestas : 2 | Foro : Básico
Sockets en Perl: No puede conectar
Estoy intentando aprender por encima cómo programar Sockets en perl y no me funciona ni tan solo el programa ejemplo más simple que he encontrado:
#!/usr/bin/perl -w
use IO::Socket;
$sender = new IO::Socket::INET (
PeerAddr => 'localhost' ,
PeerPort => 1999,
Proto => 'tcp',
);
die "No se puede abrir el socket, Motivo: $!\n" unless $sender;
print $sender "MSG : enviando mi mensaje\n";
close $sender;
Para probarlo, por un lado abro una escucha en el ...
#!/usr/bin/perl -w
use IO::Socket;
$sender = new IO::Socket::INET (
PeerAddr => 'localhost' ,
PeerPort => 1999,
Proto => 'tcp',
);
die "No se puede abrir el socket, Motivo: $!\n" unless $sender;
print $sender "MSG : enviando mi mensaje\n";
close $sender;
Para probarlo, por un lado abro una escucha en el ...
Read more : Sockets en Perl: No puede conectar | Vistas : 6306 | Respuestas : 30 | Foro : Intermedio
Incluir un pl dentro de otro
Necesito incluir un archivo .pl dentro de otro para utilizar su código, estoy usando el Open Perl IDE 1.0.1.409 para Windows. Por favor, pido ayúdenme en esto. Desde ya, gracias.
Read more : Incluir un pl dentro de otro | Vistas : 873 | Respuestas : 1 | Foro : Básico
Variables y html
Tengo un problema al incluir html en la variable:
$mensaje=" <html><head><style type="text/css">
<!--
body,td,th {
color: #FFFFFF;
}
body {
background-color: #000000;
}
-->
</style><title>prueba!</title></head><body>
<div align="center">
<p><strong>prueba!</strong></p>
<p><strong><img src="http://img502.imageshack.us/img502/244/espanaxr0.jpg"></strong></p>
<p><strong>prueba</strong></p>
<center>---------------------------------</center>
<p><strong>prueba!!!</strong></p>
</div>
</body></html> ";
open (PAGINA, ">sphate.html");
print PAGINA $mensaje;
Seguro que me faltan algunas comillas o algo, para señalar al interprete que es código HTML y no Perl.
$mensaje=" <html><head><style type="text/css">
<!--
body,td,th {
color: #FFFFFF;
}
body {
background-color: #000000;
}
-->
</style><title>prueba!</title></head><body>
<div align="center">
<p><strong>prueba!</strong></p>
<p><strong><img src="http://img502.imageshack.us/img502/244/espanaxr0.jpg"></strong></p>
<p><strong>prueba</strong></p>
<center>---------------------------------</center>
<p><strong>prueba!!!</strong></p>
</div>
</body></html> ";
open (PAGINA, ">sphate.html");
print PAGINA $mensaje;
Seguro que me faltan algunas comillas o algo, para señalar al interprete que es código HTML y no Perl.
Read more : Variables y html | Vistas : 4130 | Respuestas : 4 | Foro : Básico
Ordenar hash por valor
Hola a todos,
Estoy bloqueado con un problema relacionado con la ordenación de un hash.
Tengo un hash de dos niveles, algo como:
%mihash = {
'llave1' => { 'subllave1' => valor1,
'subllave2' => valor2,
'subllave3' => valor3},
'llave2' => { 'subllave1' => valor1,
'subllave2' => valor2,
'subllave3' => valor3},
...
}
El caso es que quiero escribir en un fichero el contenido de dicho hash, pero ordenado según el valor de 'subllave3' de forma ...
Estoy bloqueado con un problema relacionado con la ordenación de un hash.
Tengo un hash de dos niveles, algo como:
%mihash = {
'llave1' => { 'subllave1' => valor1,
'subllave2' => valor2,
'subllave3' => valor3},
'llave2' => { 'subllave1' => valor1,
'subllave2' => valor2,
'subllave3' => valor3},
...
}
El caso es que quiero escribir en un fichero el contenido de dicho hash, pero ordenado según el valor de 'subllave3' de forma ...
Read more : Ordenar hash por valor | Vistas : 2173 | Respuestas : 2 | Foro : Básico
Búsqueda especial
Hola a todos, necesito su ayuda en un tipo de búsqueda que a continuación detallo.
Dispongo de un fichero de texto con el siguiente formato:
Lo que necesito es buscar palabras concretas (de un listado) y ubicarlas en cada una de las secciones <s> Sección </s>, pongamos un ejemplo:
La palabra campeón hay que ubicarla, entonces ...
Dispongo de un fichero de texto con el siguiente formato:
- Code: Seleccionar todo
<s> Introducción </s>
Texto de introducción
<s> Desarrollo </s>
Texto del desarrollo
<s> Conclusión </s>
Texto de la conclusión
Lo que necesito es buscar palabras concretas (de un listado) y ubicarlas en cada una de las secciones <s> Sección </s>, pongamos un ejemplo:
La palabra campeón hay que ubicarla, entonces ...
Read more : Búsqueda especial | Vistas : 8709 | Respuestas : 32 | Foro : Básico
Añadir a crontab mediante script
Buenos días,
Mi pregunta quizás no esté orientada a Perl, pero lo que necesito es, que desde un script de Perl, con los datos que me pasan (vía calendario y hora), añadirle al crontab una tarea con esos datos.
Lo de coger los datos lo tengo claro, pero no veo la manera de añadirle al crontab esa tarea, porque solo se puede editar, pero no veo la manera de añadir directamente.
Hay la opción crontab ...
Mi pregunta quizás no esté orientada a Perl, pero lo que necesito es, que desde un script de Perl, con los datos que me pasan (vía calendario y hora), añadirle al crontab una tarea con esos datos.
Lo de coger los datos lo tengo claro, pero no veo la manera de añadirle al crontab esa tarea, porque solo se puede editar, pero no veo la manera de añadir directamente.
Hay la opción crontab ...
Read more : Añadir a crontab mediante script | Vistas : 1303 | Respuestas : 2 | Foro : Intermedio
Apache::Session::Informix
Agradecería si me pudiesen ayudar con lo siguiente:
Estoy trabajando las sesiones de un sistema con el módulo Apache::Session::Informix almacenando las sesiones en una base de datos Informix.
Todo anda bien, el problema es el tamaño de la sesión que es de 8k, y me es insuficiente en algunos casos.
¿Cómo puedo aumentar el tamaño de la misma, para poder guardar en cada sesión mayor volumen de información??
Muchas gracias. ...
Estoy trabajando las sesiones de un sistema con el módulo Apache::Session::Informix almacenando las sesiones en una base de datos Informix.
Todo anda bien, el problema es el tamaño de la sesión que es de 8k, y me es insuficiente en algunos casos.
¿Cómo puedo aumentar el tamaño de la misma, para poder guardar en cada sesión mayor volumen de información??
Muchas gracias. ...
Read more : Apache::Session::Informix | Vistas : 1840 | Respuestas : 3 | Foro : Módulos
txt y sock
print "introduce el txt:";
$arch=<STDIN>;
open (a,"$arch");
@site = <a>;
close (a);
$b = scalar(@site);
for($a=0;$a<=$b;$a++) {
$sock = IO::Socket::INET->new(PeerAddr => $site, PeerPort => 80, Proto => "tcp");
if ($sock) {
print $site;
}
}
Lo que pretendo con este código es cargar un texto con muchas webs y que compruebe cuáles funcionan y te las muestre. Pero algo falla.
introduce el txt:webs2.txt
Can't locate object method "new" via package "IO::Socket::INET" (perhaps you for
got ...
$arch=<STDIN>;
open (a,"$arch");
@site = <a>;
close (a);
$b = scalar(@site);
for($a=0;$a<=$b;$a++) {
$sock = IO::Socket::INET->new(PeerAddr => $site, PeerPort => 80, Proto => "tcp");
if ($sock) {
print $site;
}
}
Lo que pretendo con este código es cargar un texto con muchas webs y que compruebe cuáles funcionan y te las muestre. Pero algo falla.
introduce el txt:webs2.txt
Can't locate object method "new" via package "IO::Socket::INET" (perhaps you for
got ...
Read more : txt y sock | Vistas : 1309 | Respuestas : 5 | Foro : Intermedio
Last 10 active topics
Estadísticas
Mensajes totales 36882 • Temas totales 7430 • Usuarios totales 1981