• Publicidad

Fecha actual 2025-03-15 12:10 @549

News 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.

Lectura continua de un log con syslogd

Hola gente, navegando encontré un script:
http://www.c-note.dk/viewcv/trunk/block ... ts&view=co

que con el Sys::Syslog hace esto:

openlog('block_idiots_ssh', 'cons.pid', 'security');
open(SYSFIFO, "< " . $pipe) or die $1;
syslog('info', "Starting");

until ( $time_to_die ) {

my $line = <SYSFIFO>;
}

close(SYSFIFO);
closelog();

Ese until es un bucle infinito (es un deamon) y va leyendo constantemente el log... se supone que en cada línea nueva que se escriba en el log lo ...
Read more : Lectura continua de un log con syslogd | Vistas : 2572 | Respuestas : 2 | Foro : Avanzado


Ayuda urgente, botón cerrar "X"

Holas. Soy nuevita y aún no sé mucho y tengo un tremendo problema.

Lo que pasa es que estoy usando Perl/Tk y en la ventana que creo necesito que se bloquee o que se anule el botón de cerrar, la "X" que suelen tener todas las ventanas en el lado superior derecho de la pantalla.

Aquí esta el código:
#C:\Perl\bin\perl5.8.8.exe D:\Harvest\UDPs\FiltraExtensionesVentana.pl

use Tk;
use strict;

my @files=@ARGV;

my @errores = Valida(@files);


if ...
Read more : Ayuda urgente, botón cerrar "X" | Vistas : 940 | Respuestas : 2 | Foro : Intermedio


Comparación en javascript

Hola, tengo un problemilla con javascript, a la hora de validar tengo que hacer una comparación de enteros y si se cumple esa condición (si uno es menor que otro) tiene que entrar en el if y ejecutar unas sentencias; pues bien, no sé por qué pero me entra siempre en el if, se cumpla la condición o no. El código es el siguiente (va dentro de on script javascript):

if (o.value>f.diferenciaTotales.value){
alert("El número de ...
Read more : Comparación en javascript | Vistas : 2431 | Respuestas : 1 | Foro : JavaScript


Mantenenimiento a BD

Hola.

Estoy por hacer un mantenimiento a una BD.

La pregunta: ¿hay alguna forma o ejemplo de cómo hacerlo para reutilizar el código y no hacer un formulario por cada tabla sino parametrizar este tipo de formularios?

A ver si me echan una mano o una guía de cómo se puede hacer.

Saludos
Read more : Mantenenimiento a BD | Vistas : 1577 | Respuestas : 11 | Foro : Básico


Borrado de parámetros

Disculpen. Cometí errores en la escritura del mensaje anterior.

Agradecería si me pudiesen ayudar con lo siguiente: tengo un form formados por un mismo tipo de campo que se repite N veces y donde cada uno toma el nombre "accion-".$i.

radio_group(-name=>"accion-". $i ,
-values=>,
-labels=>\%acciones_gr,
-default=>'M',
-id=>'accion-'. $i ) ));

Mi problema es que luego quiero borrar el valor que tomó cada uno, pero solo de estos y no de todos los ...
Read more : Borrado de parámetros | Vistas : 957 | Respuestas : 2 | Foro : Intermedio


Consultas desde JavaScript

¡Hola!

Tengo un problemilla. A ver, os explico: tengo un área (asignatura) que creo con este script:
<script type="text/javascript">

num=0;
function crearArea(obj) {
num++;
//Creamos los datos del area


//Voy insertando los elementos a aprtir del objeto padre, un hermano, después seguido a éste otro hermano...y asi sucesivamente
papa = obj.parentNode;
hermano = obj.nextSibling;

contenedor = document.createElement('div');
contenedor.id = 'div'+num;
if (hermano == undefined)
papa.appendChild(contenedor)

else
papa.insertBefore(contenedor, hermano)



txt = document.createElement('<br>'); // Meto un salto ...
Read more : Consultas desde JavaScript | Vistas : 6069 | Respuestas : 1 | Foro : JavaScript


Tomar valores de array[0..-2]

:shock: Bueno, me topé con un problema que no tratan en Learning Perl. Es el siguiente:

Yo sé que para tomar el último valor de un array se usa$ultimo = $array;¿Pero qué tal si yo quiero tomar todos los elementos de un array que van del último al penúltimo?

Bueno pensé en algo como:@elementos = $arraypero no obtengo buenos resultados; si a @array le asigno como elementos ...
Read more : Tomar valores de array[0..-2] | Vistas : 1518 | Respuestas : 3 | Foro : Básico


Acelerar la rotación de proxies

Buenas, hace unos días que empecé a mirar el Perl para unas aplicaciones que necesito y hasta ahora creo que conseguí lo que necesitaba, pero tengo un problema que destroza todo lo que hice; a ver si consigo explicarlo: este es un fragmento de un programa que hice que navega a través de proxies, una especie de navegador custom.

$ua = LWP::UserAgent->new;
$ua->agent("Mozilla");
$ua->cookie_jar($cookie_jar);
$ua->proxy('http', "http://$linea");
$ua->timeout(10);
$req = HTTP::Request->new (POST, $url);
$req->content_type("application/x-www-form-urlencoded");
$req->content($query);
push ...
Read more : Acelerar la rotación de proxies | Vistas : 3061 | Respuestas : 20 | Foro : Intermedio


Login con Perl en phpbb2

Quisiera saber si tienen alguna idea de cómo hacer que mediante Perl pueda loguerame en un foro en PHP. La forma más habitual es el manejo de las cookies, pero ¿de qué manera puedo manejar las cookies para que queden de la misma forma que lo hace la función login.php? (Esto está dentro del pack del foro que es gratuito). Muchas Gracias.
Read more : Login con Perl en phpbb2 | Vistas : 15184 | Respuestas : 36 | Foro : Avanzado


Saber la similaridad en cadenas de textos

Hola nuevamente, estoy tratando de hacer un paquete que tome una cadena de texto/numérica, cuente cuántas veces se repite y luego se compare con el resto de cadenas a ver en cuanto por ciento se parecen, o no.

La primera parte, el conteo, lo sé hacer: creo un hash con clave y frecuencia y voy añadiendo valores. Él mismo está ordenado de mayor a menor por frecuencia de aparición.

Mi problema surge cuando una vez ...
Read more : Saber la similaridad en cadenas de textos | Vistas : 2551 | Respuestas : 16 | Foro : Básico


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36892 • Temas totales 7434 • Usuarios totales 1981