Foro - Perl en Español

Hola a todos.

Primero de todo, enhorabuena a todos los que hacéis posible este foro.
Mi problema es que llevo varios días intentando resolver un programa y no soy capaz.

El enunciado es el siguiente:

Desarrollar un programa que abra el archivo prueba.txt (es un archivo que posee cadenas de nucleótidos y entre medias la palabra "BASURA") y cree uno nuevo de nombre pruebafin.txt, de tal forma que haga desaparecer todas las líneas que comiencen ...

Hola :)

Me gustaría saber alguna forma de determinar el elemento (la variable) más repetido en un array para almacenar este elemento más tarde en un hash.

Gracias.

Hola estoy haciendo un programa que genera números mediante una función llamada &generacion. Lo que yo quiero hacer es que este código verifique constantemente si la función &generacion no devuelve un número que sea múltiplo de 10.


Una parte del código es esta:

($ultimo,$carta) = &generacion;
if ($ultimo =~/0$/) {
print "Ok , generacion exitosa\n\n\a";
exit 1;
} else {
print "Seguir generando........\n\n";
&generacion;
}

Lo que yo quiero es que si la variable $ultimo ...

Hola gente, estoy comenzando a familiarizarme con el Win32::GUI, viendo las demos que vienen con el módulo, que por cierto están bien, pero bueno, me surgen dos consultas...

1.- ¿Cuál es el código para poner un texbox (caja de texto editable) en un formulario para pedir un nombre y que el usuario lo introduzca y pasarlo a una variable?
2.- ¿Cuál es el código para poner un calendario para seleccionar una fecha en un formulario ...

Buenas. Tengo una duda. Quisiera saber cómo almacenar x valor en variable. A ver si con este ejemplo me hago entender.

$a='hola';
$e='adios';
$letras = ($a, $e);
print $letras;

Ok, ahora explico un poco más: tengo una variable con un valor tipo string, pero a ese valor se convierte en el mismo pero dos veces y le agrego una letra al principio y otra al final; luego esos valores los guardo en una variable y ...

Hola a todos. Tengo el siguiente código

#!/usr/bin/perl -w

use IO::Socket;
use Net::hostent;

$PORT = 9000;

$server = IO::Socket::INET->new( Proto => 'tcp',
LocalPort => $PORT,
Listen => 3,
Reuse => 3);

while ($client = $server->accept()) {
$client->autoflush(1);
print $client q(

Bienvenido
);

while ( <$client>) {
next unless /\S/;
if (/quit|exit/i)
{ last; }
elsif (/date|time/i)
{ printf $client "%s\n", scalar localtime; }

elsif (/net user/i )
{ print $client ` net user `; ...

Hola,

Al ejecutar un programa me da este error y no sé exactamente por qué es. En la línea que indica sólo hay un "}" y no encuentro alrededor ningún error.

¿Con qué tipo de errores sale este mensaje?

Hola.

Ando buscando un módulo para descargar cualquier archivo de una página web, ya sea una imagen, una aplicación o un zip, porque he visto módulos que descargan solo algunas de las anteriores opciones. ¿Alguien conoce un módulo que descargue cualquier archivo de una página web?

¡Buenas!
¿Cómo puedo pasar de :

$cadena = 'adagfdkjsbfjbdvl';

a

$cadena = 'adag fdkj sbfj bdvl'; ??
Gracias.

Quiero usar un hash ya hecho en una subrutina, ¿podría introducirlo como argumento?, no quiero modificarlo ni nada, solo partir de él. Gracias.