Foro - Perl en Español

¡Buenas!
El problema que tengo es que al ejecutar desde el cliente un cgi me sale esto en el error.log de apache:

procesado.cgi: Use of uninitialized value in concatenation (.) or string at /usr/lib/cgi-bin/procesado.cgi line 292., referer: http://192.168.176.66/cgi-bin/procesado.cgi

He observado que en un servidor con Apache2 se 'traga' el error anterior y hace lo que debe, ...

¿Qué hay, amigos perleros?

Tengo un nuevo problema: supongamos que tengo un archivo con texto y es importante sacar información de ahí; ejemplo: tengo en una línea puerto y me interesa imprimir lo que hay en esa línea donde está esa palabra y así con otras más palabras claves que me tendrán que arrojar información que contiene esa línea y tengo este pobre código...

Espero me puedan ayudar...

#!/usr/bin/perl

$file='/root/serverconfesp';
open(FILE,"$file") or $msg = ...

Hola amigos del foro. En un foro anterior creating021 me recomendó leer una sección de expresiones regulares en Perl. Lo estudié pero aún no consigo lo que deseo hacer y es por eso que acudo a ustedes, y es que deseo reemplazar las comillas simples(') por comillas dobles (") de un archivo y hago lo siguiente en mi script:

system "(sed -i 's/'/\"/g' dominio.ncl)";

Muchas gracias por su aporte.

Hola amigos de Perl en Español, les escribo en esta oportunidad por algunas dudas con respecto al hash...

Tengo en mi base de datos un campo para nacionalidad tipo char que toma solo dos valores V(venezolano) y E(extranjero).

Entonces para pasar los datos al template primero usaba array pero ahora quiero utilizar hash con la función map() pero me causa un error, que de verdad no entiendo por qué...

Fragmento de código de Perl:
if ...

Buenas, soy nuevo en el foro. Saludos a todos :) y encantado.

Bueno, intentando aprender a usar Gtk2 , y buscando por Google, encontré unos ejemplos.

#!/usr/bin/perl -w
use strict;
use Gtk2 -init;
use Gtk2::GladeXML;

my($programa, $ventana_principal, $etiqueta, $widget_entrada_de_texto);

$programa = Gtk2::GladeXML->new('prueba.glade');

$ventana_principal = $programa->get_widget('ventana_principal');
$etiqueta = $programa->get_widget('etiqueta');

### Creo el objeto "$widget_entrada_de_texto" el cual contiene métodos
### predefinidos para interactuar con la "entrada de texto" ...

¿Cómo se puede generar un fichero durante la ejecución de un programa, y escribir los resultados del programa en él?

Tengo que hacer un programa que dada una secuencia busque si contiene una expresión que es introducida por el usuario desde teclado. Se tiene que obtener también la posición de inicio y final de esa expresión en la secuencia cada vez que aparezca esa expresión.

Tengo el siguiente código
#!/usr/bin/perl -w
use strict;
use warnings;

my $sec = 'SXRDCTFFFFFYVGUBHNJKLFVNLAISUBNLASDIUV
ÑSDVFNÑASNVÑAJSDBNÑFOIVABNÑSDFVBGÑASOI
OUIBHVDUIOAEIRVCTFFFFFFFFFBIÑSDAUBGPEWIUBVÑWEOPINGVÑER
EOVUNHOWUIGNÑVWUvÑBNVPIUWBNVIPUWBPIVÑBN
DUIVOWPIER';
my $expr;
do {
print "Introduzca la expresión regular a buscar: ...

Diferencias entre Perl 6 y Perl 5

(Traducción del original Perl6::Perl5::Differences)

Me encuentro con el siguiente problema.

A lo largo del desarrollo de mi programa me he encontrado con diversos problemas que aquí amablemente habéis solucionado; en este momento me encuentro con lo siguiente: una vez que me conformaba con el funcionamiento de mi servidor, se quedaba colgado y no mostraba bien los datos, o no los refrescaba. El caso es que vía telnet la respuesta era precisa.

Resulta que ahora me encuentro con que si ...

Necesito hacer un programa que a partir de una secuencia de letras, la separe en tripletes (grupo de 3 letras) e indique el número de veces que aparece cada triplete a lo largo de la secuencia.

He escrito el siguiente código:

$sec = 'CGACGATCTTCGTACGGGACTAGCTCGTGTCGGTCGC';

for($i=0; $i < (length($sec) - 2) ; $i += 3) {
$tres = substr($sec,$i,3);

# Contamos los tripletes
$contador = 0;
$contador++ while $sec =~ /$tres/g;


# Declaramos un hash ...