-
- Publicidad
Fecha actual 2025-03-14 20:31 @896
News of Foro - Perl en Español
Site map of Foro - Perl en Español » Foro : Foro - Perl en Español
La comunidad de programadores en Perl de habla-hispana.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 : 899 | 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 : 4188 | 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 : 2212 | 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 : 9048 | 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 : 1352 | 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 : 1919 | 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 : 1380 | Respuestas : 5 | Foro : Intermedio
Win32::ODBC No puedo llamar Oracle Stored Procedures
Hola amigos
Alguien sabe cómo puedo llamar Oracle Stored procedures usando Win32::ODBC porque parece estar funcionando correctamente con consultas SQL como SELECT, INSERT, UPDATE, y DELETE pero no hace llamadas a procedimientos.
Si alguien sabe cómo hacerlo o tiene una sugerencia o Link de verdad se los agradeceré mucho.
¡Saludos a todos los miembros de la comunidad!
Alguien sabe cómo puedo llamar Oracle Stored procedures usando Win32::ODBC porque parece estar funcionando correctamente con consultas SQL como SELECT, INSERT, UPDATE, y DELETE pero no hace llamadas a procedimientos.
Si alguien sabe cómo hacerlo o tiene una sugerencia o Link de verdad se los agradeceré mucho.
¡Saludos a todos los miembros de la comunidad!
Read more : Win32::ODBC No puedo llamar Oracle Stored Procedures | Vistas : 2360 | Respuestas : 4 | Foro : Módulos
Respaldo recursivo en FTP
Hola a todos,
Ojalá me puedan ayudar.
Estoy usando el módulo de FTP (Net::FTP) de Perl para respaldar un sitio web, sin embargo tengo una pregunta con respecto a este módulo:
¿Es posible hacer un respaldo recursivo, o sea, que pueda entrar en cada directorio y respaldar lo que hay dentro?
Ahorita no tengo problemas para hacer el FTP pero tengo que poner una lista de directorios en un archivo aparte y después iterar sobre ...
Ojalá me puedan ayudar.
Estoy usando el módulo de FTP (Net::FTP) de Perl para respaldar un sitio web, sin embargo tengo una pregunta con respecto a este módulo:
¿Es posible hacer un respaldo recursivo, o sea, que pueda entrar en cada directorio y respaldar lo que hay dentro?
Ahorita no tengo problemas para hacer el FTP pero tengo que poner una lista de directorios en un archivo aparte y después iterar sobre ...
Read more : Respaldo recursivo en FTP | Vistas : 787 | Respuestas : 1 | Foro : Básico
Problema script [Win32::SAM]
Buenas. Tengo este código en Perl y tengo un texto que contiene los siguientes números:
¿Cómo puedo hacer que se le asigne a la variable $id uno por uno los números de ese archivo de texto y según vaya asignándolo vaya abriendo la respectiva web? Gracias y espero su ayuda.
#!c:/perl/bin
#Iniciamos nuestros módulos
use Win32::OLE;
use Win32::SAM;
#Obligamos a hacer flush
$| = 1;
#Indicamos como manejar errores ...
- Code: Seleccionar todo
292007
243764
290922
239811
244655
271741
¿Cómo puedo hacer que se le asigne a la variable $id uno por uno los números de ese archivo de texto y según vaya asignándolo vaya abriendo la respectiva web? Gracias y espero su ayuda.
#!c:/perl/bin
#Iniciamos nuestros módulos
use Win32::OLE;
use Win32::SAM;
#Obligamos a hacer flush
$| = 1;
#Indicamos como manejar errores ...
Read more : Problema script [Win32::SAM] | Vistas : 719 | Respuestas : 1 | Foro : Básico
Last 10 active topics
Estadísticas
Mensajes totales 36892 • Temas totales 7434 • Usuarios totales 1981