Foro - Perl en Español

listado.png

Resulta que tengo un CMS hecho en Perl que trabaja con una base de datos CSV.

Pero tengo problemas con acentos, tildes y "ñ", los cuales pensaba que había resuelto. Tengo un código que me inserta un registro y me funciona bien y un código similar que edita el registro. Pero ahí vino el problema: los caracteres especiales se guardan directamente en el archivo lo que hace claro que en la ...

items => !$items ? : $items,


¡juas, juas! ¿Por qué rayos lo usarían? Es lo que me genera duda, ¿cuándo uno podría usar eso ahí?. No entender.

Hola. He utilizado las variables de sesión desde el método POST y todo bien, PERO ahora las necesito utilizar desde un HREF, el cual estoy ubicando como columna en cada registro mostrado por un select y necesito utilizar las variables del registro que el usuario seleccione.

¿Es posible hacer esto o tengo que enviar los datos del registro seleccionado como parámetros al script para manipular dichos datos?

Gracias y saludos a todos.

Acaban de salir, con una preciosa animación al comienzo de cada vídeo.

https://www.youtube.com/playlist?list=P ... n_IpSFcdbN

Hola, Perleros.

Estoy tratando de descargar imágenes de un sitio web mediante un código que realizó explorer en su momento. Este descarga la imagen pero no puedo abrirla (dice que no se puede cargar).

Les pido orientación al respecto. Muchas gracias.

PD: El código que muestro no es el original, lo modifiqué con ejemplos de Internet.
#!/usr/bin/perl

use strict;
use warnings;

use LWP::Simple;

my $url = 'https://www.esrl.noaa.gov/psd/cgi-bin/data/composites/comp.day.pl?var=Sea+Level+Pressure&level=1000mb&iy%5B1%5D=&im%5B1%5D=&id%5B1%5D=&iy%5B2%5D=&im%5B2%5D=&id%5B2%5D=&iy%5B3%5D=&im%5B3%5D=&id%5B3%5D=&iy%5B4%5D=&im%5B4%5D=&id%5B4%5D=&iy%5B5%5D=&im%5B5%5D=&id%5B5%5D=&iy%5B6%5D=&im%5B6%5D=&id%5B6%5D=&iy%5B7%5D=&im%5B7%5D=&id%5B7%5D=&iy%5B8%5D=&im%5B8%5D=&id%5B8%5D=&iy%5B9%5D=&im%5B9%5D=&id%5B9%5D=&iy%5B10%5D=&im%5B10%5D=&id%5B10%5D=&iy%5B11%5D=&im%5B11%5D=&id%5B11%5D=&iy%5B12%5D=&im%5B12%5D=&id%5B12%5D=&iy%5B13%5D=&im%5B13%5D=&id%5B13%5D=&iy%5B14%5D=&im%5B14%5D=&id%5B14%5D=&iy%5B15%5D=&im%5B15%5D=&id%5B15%5D=&iy%5B16%5D=&im%5B16%5D=&id%5B16%5D=&iy%5B17%5D=&im%5B17%5D=&id%5B17%5D=&iy%5B18%5D=&im%5B18%5D=&id%5B18%5D=&iy%5B19%5D=&im%5B19%5D=&id%5B19%5D=&iy%5B20%5D=&im%5B20%5D=&id%5B20%5D=&monr1=5&dayr1=1&monr2=5&dayr2=1&iyr%5B1%5D=2018&filenamein=&plotlabel=&lag=0&labelc=Black+and+White&labels=Contours+%28Black+and+White+Only%29&type=1&scale=&label=1&skip_vector=&cint=&lowr=&highr=&istate=0&proj=Custom&xlat1=-60&xlat2=-10&xlon1=240&xlon2=330&custproj=Cylindrical+Equidistant&level1=1000mb&level2=10mb&Submit=Create+Plot';

my $file = 'slp.gif';

getstore($url, $file);

Tengo presente el siguiente error DBD::Pg::st execute failed: ERROR: invalid byte sequence for encoding "UTF8": 0xfa. El error se presenta cuando llamo el script desde un menú de html enviando lo siguiente: DBD::Pg::st execute failed: ERROR: invalid byte sequence for encoding "UTF8": 0xfa.

Al ejecutar el script directamente no envía el mensaje de error y realiza el INSERT correctamente, lo que supongo que el problema es desde el menú donde lo estoy llamando o ¿qué ...

Hola, estoy guardando archivos vía web desde Perl y efectivamente los guarda pero con 0 bytes, el panorama es el siguiente:

El directorio se encuentra creado con los siguientes permisos:
drwxrwxrwx 4 root root 26 Jul 10 15:03 Directorio_Destino

En el directorio anterior creé dos directorios más:
drwxrwxrwx 5 root root 51 Jul 12 13:37 D1
drwxrwxrwx 4 root root 36 Jul 12 14:37 D2

En los directorios anteriores se crean directorios de acuerdo ...

• A Complete Course of the Raku programming language
• Aprende X en Y minutos, donde X=Perl6
• Prueba Perl 6 sin instalar nada
• Perl6Intro
• Try Perl (en inglés) Pruebas sencillas
• Perltuts
• Piensa en Raku (libro)
• Perl 6 Tutorial Un vídeo-tutorial completo en 80 minutos.

• Prueba Perl 5 sin instalar nada (glot.io)
• Prueba Perl 5 sin instalar nada (tutorialspoint.com)
• Perltuts
• Aprender Perl

Aprende X en Y minutos, donde X=Perl6, en español