Foro - Perl en Español

Hola compañeros, tengo un problema.

Estoy haciendo un programa para bajarme de forma automática unos ficheros de una web. Si lo ejecuto directamente desde el shell con curl, me descarga el fichero sin problemas:

$ curl "http://nomads.ncep.noaa.gov/cgi-bin/filter_gfs.pl?file=gfs.t00z.pgrbf00.grib2&lev_10_m_above_ground=on&var_UGRD=on&var_VGRD=on&subregion=&leftlon=-20&rightlon=20&toplat=40&bottomlat=20&dir=%2Fgfs.2012042800" -o myfile
% Total % Received % Xferd Average Speed Time Time Time Current
Dload Upload Total Spent Left Speed
101 2942 0 2942 0 0 2268 0 --:--:-- 0:00:01 --:--:-- 12057

Pero con el siguiente fichero ...

¡Hola de nuevo!

Estoy haciendo un programa que me permita leer determinadas líneas de un archivo de modo que en aquella que aparezca "GENE", debe extraer "GENE" y su valor, que son una serie de caracteres que aparecen a continuación de "GENE".

Hasta aquí bien. Ahora debo generar un array asociativo o hash con estos pares de valores y tengo un problema: a la hora de utilizar la variable con que nombré al valor de ...

¿Qué otra alternativa sencilla tengo para poder mostrar los asteriscos que no sea usando Term::ReadPassword?

¿ Alguien me lo puede decir ?

Hola a todos los monjes.

Hace ya un año y medio que por primera vez vi lo que era Perl (y agradezco a Larry Wall).
Tanto fue que me gustó, que trato de usarlo para todo, sí... todo.

En esta ocasión me encuentro muy trabado con lo siguiente:

Necesito un programa que ejecute dos procesos al mismo tiempo.
Googlee y googlee y no doy en la tecla.
Entiendo que lanzar varios procesos recursivos (que no ...

Hola, me acabo de unir a este foro. Soy nueva en Perl y necesito numerar las líneas de un programa ya que me tiene que salir el contenido del texto numerado.

El código que tengo hasta ahora es:

open( FUENTE, "$archivo1" ) || die "no se puede abrir el archivo\n";
open( RESULTADO, ">$archivo5" ) || die "no se puede abrir el archivo\n";

while ( $linea = <FUENTE> ) {
if ( $linea =~ /EXPRESS/ ...

Hola, estaba practicando el manejo de tablas mediante Tk y llegué a un punto en el que no sé cómo
mostrar el valor entero.

El problema está en la función show_cells(), la cual muestra solo los números. Mi idea es que muestre el valor completo. Lo he intentado mostrando con $_ pero no se muestra.

#!/usr/bin/perl
use warnings;
use Tk;
use Tk::Table;
my $cols = 10;
my $rows = 20;
my %slct;

# ------------------------------------------------------------------------ ...

Tengo una duda básica sobre cómo usar for() para que vaya disminuyendo el número en vez de aumentar.

El código que tengo es:

$uno = "1";
$dos = "6";

for my $num($uno..$dos) {
print $num."\n";
}

La idea es que en vez del 1 al 6 vaya del 6 al 1.

¿ Alguien me puede explicar cómo lo hago ?

Saludos, comunidad de Perl en Espanol.

Les escribo en este caso solicitando ayuda para la realización de una aplicación web.

Se me ha presentado un problema con respecto a la codificación de la página web. Quiero que ésta use UTF-8 debido a que todos mis datos los manejaré bajo esa codificación. He agregado la etiqueta meta en el html para tal fin, he modificado Apache2 para que defina utf-8 por defecto pero no consigo que ...

Buenas, este es el ejercicio que nos han mandado:

Previamente es necesario estudiar los temas de "Entrada y salida en archivos" y "procesamiento básico de textos".
Posteriormente hay que copiar los cuatro archivos que están en: http://bip.weizmann.ac.il/course/prog/a ... 4_sources/ y que corresponden a la descripción textual de un gen, presentes en la base de datos UniGene.

El objetivo de la práctica es:
Escribir un programa que reciba el nombre ...

Sí funcionan con los números, pero no con letras. Por ejemplo, si pongo:
print --($foo = 'BA');
Entiendo que debería aparecer en pantalla "AZ", pero en vez de eso me muestra "-1". Extrañamente, sí funciona bien el incremento.