Foro - Perl en Español

Buenos días:

Quería saber si el comando AWK acepta variables.

Como verán metí dentro de un for() la línea del AWK pero no funciona.

for usuario in Ruben Juan Carlos Roberto
do
echo $usuario
awk '/$usuario/, /Status:/' dos.txt >$usuario.txt
done

¿Podrían ayudarme?

Muchas gracias

¡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 ?

Muy buenas, me presento me llamo Iván y estoy desarrollando con Perl, CGI y DBI.

Bueno, al lio, resulta que estoy recuperando de una BD el valor de un campo. Este valor es un 0 pero cuando hago la consulta con Perl y obtengo el valor de la referencia me devuelve un 1 en el log... Os pongo la subrutina:

sub comprobarNDocsTiposFuentes {

my ( $self, $tipoComprobar ) = @_;

$self->guardarLog( "Valor que llega ...

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