• Publicidad

Fecha actual 2025-02-26 20:16 @886

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.

Hilos y peticiones HTTP

Buenas tardes, comunidad. Tengo el siguiente script para solucionar un problema. Si pueden ayudarme, por favor.

Problemática: es un sistema de votación. Ejemplo: ¿Está de acuerdo en que Perl es un lenguaje potente? "sí", "no".

El cual tiene dos opciones ("sí","no") Este sistema permite realizar dieciséis votos, es decir, ocho síes y ocho noes para una IP. Luego de realizar los dieciséis votos u ocho votos de su elección, la dirección IP es bloqueada por ...
Read more : Hilos y peticiones HTTP | Vistas : 14976 | Respuestas : 8 | Foro : Web


Envío GET POST con HTTPS

Buenos días.

Estimados: favor solicito. Ayuda a una duda que tengo. ¿Cómo puedo realizar un envío POST utilizando HTTPS?

Tengo el siguiente código:
#!/usr/bin/perl -w

use strict;
use CGI::Carp qw(fatalsToBrowser);

use LWP::UserAgent;
use HTTP::Request;

my $url = "https://mipagina.aspx";
my $query = "2BZ0b0FAuG%2BousKAoO4powLAt%2Fo6qoMZRsniW23WyEyg82peBBfshM84E8%3D&txtNombre=ivan&txtNroTelf=3508548&txtContador=84&txtMensaje=prueba&txtCaptcha=69NJ&txtFechaHora=01%2F10%2F2014+10%3A25&btnEnviar=Enviar";

my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/5.0 (Windows NT 6.1; WOW64; rv:32.0) Gecko/20100101 Firefox/32.0");
$ua->proxy('http','http://usuari:contraseña@miproxuejemplo:8080');

my $req = HTTP::Request->new(POST => $url);
$req->content_type('application/x-www-form-urlencoded');
$req->content($query);

Por favor, si alguien puede darme una ayuda para realizar peticiones con ...
Read more : Envío GET POST con HTTPS | Vistas : 2079 | Respuestas : 2 | Foro : Web


Uso de CGI::Session

Ayuda, explorer. No logro usar el módulo de CGI-Session-4.48.tar a pesar de leer el tutorial de CPAN. Intento e intento y no lo logro, te muestro el código:

Script1:
use CGI;
use CGI qw':standard *table';
use DBI;
use POSIX;
use CGI::Session;
use CGI qw(:standard :netscape :shortcuts);
use CGI::Carp qw 'fatalsToBrowser warningsToBrowser';

###################################
#######Object Initialization#######
###################################
$session = CGI::Session->new();
$CGISESSID= $session->id();
print $session->header();

###RECIBO PARAMETROS

my $p_event = param("evento");
my $f_ini = param("date1");
my $f_fin = ...
Read more : Uso de CGI::Session | Vistas : 2600 | Respuestas : 4 | Foro : Intermedio


Cómo instalar el Twiki

Llevo días intentado instalar Twiki para mi empresa y no he podido. Buena solución pero quiero demostrar algo poderoso hecho en Perl y resulta que es difícil instalar aun siguiendo la documentación del sitio de Twiki... Si alguien sabe cómo instalarlo, me podría ayudar mm :( jajaja :) o algún truco para hacerlo. Gracias.
Read more : Cómo instalar el Twiki | Vistas : 9392 | Respuestas : 22 | Foro : Administración


Enviar carpeta por FTP a servidor

Hola,

¿cómo se enviaría un directorio a un servidor externo por FTP? Actualmente envío fichero txt, CSV, y binarios... con el siguiente código:
#!/usr/local/bin/perl

use Class::Date qw(date now);
use File::Path ;
use DateTime;
use BSD::Resource;
use File::Copy;
use Net::FTP;

my $username = "web.com";
my $pwd = "¿Quien sabe?";

my $ftp = Net::FTP->new("xxx.xx.xxx.xxx", Debug => 0) or die("No s'ha pogut connectar el servidor: $!");
$ftp->login($username,$pwd) or die("Login incorrecte: $!");
#ACCIONS
$ftp->cwd("html/");
my @arxius = glob("/home/enric/csv/*.csv"); ...
Read more : Enviar carpeta por FTP a servidor | Vistas : 1268 | Respuestas : 3 | Foro : Básico


Alta automática a BD de varios archivos CSV

Hola. Quisiera automatizar una serie de altas en BD, estas altas se ejecutará desde varios archivos CSV y dependiendo del CSV van a una tabla u otra.

He pensado en hacer un for que tire de dos array, uno para los archivos CSV y otro para las TABLAS. Existe una concordancia entre el nombre del fichero y la tabla. Por ejemplo:

"trua_vm_mensual.csv" actualiza la tabla "tbl_vm_tru"
"trub_vm_mensual.csv" actualiza la tabla "tbl_vm_tru"
"cru_vm_mensual.csv" actualiza la tabla ...
Read more : Alta automática a BD de varios archivos CSV | Vistas : 1122 | Respuestas : 1 | Foro : Básico


Borrar archivos temporales de Windows

¿ Tiene alguna consecuencia estar borrando cada semana los archivos temporales de Windows ?
Read more : Borrar archivos temporales de Windows | Vistas : 1438 | Respuestas : 5 | Foro : Pasando el rato


El clásico leer completo

Hola. Estaba viendo la clásica función de "leer completo" que tienen todos los foros y traté de hacer lo mismo con un código HTML con muchas etiquetas que después se reemplazan. Lo hice con la función substr(). Clásicamente funciona bien si el código no tiene etiquetas pero en mi caso sí las tiene y cuando uso substr() corta las etiquetas delatando todo el código y mostrándose mal. Intenté todo pero siempre es igual.

¿ Hay ...
Read more : El clásico leer completo | Vistas : 1629 | Respuestas : 1 | Foro : Programación en general


Crear canal IRC

¿ Cómo puedo crear un canal gratuito en cualquier servidor conocido ?
Read more : Crear canal IRC | Vistas : 803 | Respuestas : 1 | Foro : Pasando el rato


Recomendación de página

Hola, estoy buscando un servicio que me ayude a posicionar los malos espacios de oraciones. He visto que varios foros lo hacen, acomodan los espacios y las oraciones con treinta espacios de más se ven bien.

Por ejemplo, la versión mala:

hola soy un texto mal posicionado bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla
bla bla bla bla bla bla bla bla bla bla bla ...
Read more : Recomendación de página | Vistas : 872 | Respuestas : 1 | Foro : Pasando el rato


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36892 • Temas totales 7434 • Usuarios totales 1981

cron