• Publicidad

Fecha actual 2024-11-23 10:29 @478

News News of Avanzado

Site map of Avanzado » Foro : Avanzado

Así que programas sin strict y las expresiones regulares son otro modo de hablar. Aquí encontrarás respuestas de nivel avanzado, no recomendable para los débiles de corazón.

44 recetas para trabajar con Unicode en Perl

Esta es una traducción de artículos publicados en Perl.com de las 44 recetas que Tom Christiansen creó para trabajar con Unicode en Perl 5.

Están disponibles también en la propia documentación de Perl, a partir de v5.20.2. Se accede con el comando perldoc perlunicook

An intelligible guide to Unicode in Perl 5.

Read more : 44 recetas para trabajar con Unicode en Perl | Vistas : 26902 | Respuestas : 45


Problemas con ñ y EBCDIC (Convert::IBM390)

Estimados:

Tengo un problema con Perl y las "ñ"... El tema es así...

A través de un perl genero un spool y lo paso a EBCDIC con la librería "Convert::IBM390". El tema es que cuando abro los archivos con un editor de texto (ultraedit) las 'ñ' me figuran con "?".

Pasé los archivos en modo binario. Además, cuando me conecto desde sqlplus a Unix pasa lo siguiente:

Imagen
(le quité algunos datos posiblemente sensibles por ...
Read more : Problemas con ñ y EBCDIC (Convert::IBM390) | Vistas : 11367 | Respuestas : 6


Aceptar peticiones en perl

¡Hola a todos!

No sé cómo buscar lo que quiero hacer, por eso pongo este post. Sé que quizás este abierto otro hilo con el tema, pero como digo, no sé qué nombre técnico tiene.

Lo que me gustaría hacer es un proceso Perl que esté continuamente en funcionamiento y mediante una petición realizara una actividad.

Es decir, un proceso que contenga loop infinito con capacidad para interceptar interrupciones creadas por otro. Este último indicará ...
Read more : Aceptar peticiones en perl | Vistas : 1407 | Respuestas : 1


regexp con excepciones

La expresión regular: "{3}{3}" reconocerá:

AQUSOL BARNEY FREDER ...

pero no...

AQUSOF BARNFY FREFER 1REDER ...

Cómo puedo decirle que, en vez de exigir 3 repeticiones de y 3 repeticiones de , exija 2 repeticiones de en las tres primeras posiciones, independientemente de la posición en la que se den, y lo mismo para las repeticiones de , de forma que sean válidas:

AQUSOF 1QUSOF A1USOF AQ1SOF AQ1FOL ...

En resumen, que cuando ...
Read more : regexp con excepciones | Vistas : 1936 | Respuestas : 1


Problemas expresiones regular \b con tildes y ñ

¡Hola a todos!

¡Tengo una dudilla! Nuestro gran idioma tiene caracteres como á,ó,ñ,...

Lo que me sucede con ellos es que al hacer un split() con \b a la linea "esto es una prueba con el español", es decir:
my $linea="esto es una prueba con el español";
@tmp=split('\b',$linea);
print "@tmp";

El resultado es:
esto es una prueba con el espa ñ ol
Separando, como veis, la palabra español de la manera espa/ñ/ol.

¿Sabéis ...
Read more : Problemas expresiones regular \b con tildes y ñ | Vistas : 2955 | Respuestas : 1


Fallo ocasional en función addfile (Digest::SHA)

Hola a todos.

Tengo un problema con la función addfile() del módulo Digest::SHA.

En ocasiones con determinados ficheros falla la función y termina el programa:
Read failed: Bad file descriptor at program.pl line 5

Lo que quiero es controlar ese error para que el programa continúe.

Según el autor del módulo, dicha función falla (croak) cuando no puede leer el fichero por cualquier razón:
The $io_handle is read until EOF and the content is appended ...
Read more : Fallo ocasional en función addfile (Digest::SHA) | Vistas : 2992 | Respuestas : 9


Ajax: manejo de variables globales

Cordial saludo.

Me pasa lo siguiente: hago una consulta de una base de datos y la imprimo en un div. Además le pongo una lista de checkbox para quitar y poner un registro de la consulta pero lo que quiero es que esa lista yo la pueda manejar con hash, y como llave, el primer parámetro de la lista y los datos los pueda manejar como una variable global porque no puedo manipular la base ...
Read more : Ajax: manejo de variables globales | Vistas : 2751 | Respuestas : 4


LWP::UserAgent con certificado .cer

Hola, estoy intentando ejecutar unos comandos por REST URI para Azure, por ejemplo para ver los servicios hospedados que tengo en Azure. Para ejecutarlo se necesita un certificado pero no soy capaz de asociar este certificado en la petición GET. Este es mi código:

#!/usr/bin/perl
use LWP::UserAgent;
my $ua = LWP::UserAgent->new();
$ua->default_header("x-ms-version" => "2009-10-01");
$ua->protocols_allowed( );
$ua->show_progress( TRUE );
$ENV{HTTPS_CA_DIR} = 'C:/Users/Leo/Desktop';
$ENV{HTTPS_CA_FILE} = 'C:/Users/Leo/Desktop/azure.cer';

my $req = HTTP::Request->new(GET =>'https://management.core.windows.net/XXXXXXXXXXXXXX/services/hostedservices');
$req->header("x-ms-version" => "2009-10-01"); ...
Read more : LWP::UserAgent con certificado .cer | Vistas : 1334 | Respuestas : 1


Re: Perl sobre Google App Engine

Bienvenido a los foros de Perl en español, vtrillo.

Sí que se puede, o al menos, hay una serie de voluntarios que lo están intentando.
Read more : Re: Perl sobre Google App Engine | Vistas : 1084 | Respuestas : 0


Ejecutar un script que ya está en ejecución

Mi pregunta es por que tengo un script que tiene que consultar vía API web, más de setenta mil registros...

Éste hace unos procesos a base de datos, etc, etc...

Pero mi script tarda 3 horas aproximadamente en arrojarme el resultado por cada siete mil registros...

Mi pregunta es... ¿Podré ejecutar ese script de nuevo si no ha terminado el primer bloque de siete mil registros para leer los nuevos registros?

La idea es que ...
Read more : Ejecutar un script que ya está en ejecución | Vistas : 1687 | Respuestas : 3


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36880 • Temas totales 7428 • Usuarios totales 1981

cron