Foro - Perl en Español

Hola, estoy con un bot que baja noticias de una web pero estoy con el problema que no me guarda en el txt y no veo el error; a ver si alguien podría ayudarme

for ($_c = 0;$_c < $#noticias; $_c++) {
open(F,">>sport.txt");
print F "call" . $noticias
. "\nFech: " . $noticias
. "\nTi: " . $noticias
. "\nLink: " . $noticias
. "\nDesc: " . $noticias
. "\n\n"
if ($noticias);
close(F);
}
...

Buenas,

Tengo un script que básicamente recorre un csv separado por comas, y utiliza el primer campo para pasarlo a hexadecimal y hacer un xor de los valores.
El problema está en que no consigo que el cálculo me lo haga correctamente, pero tampoco sé dónde está el fallo.

Aquí os dejo el código a ver si alguno me podéis iluminar, ya que yo no lo encuentro.

# Valores fijos para el cálculo del ...

¡Hola!

Mi pregunta es la siguiente: ¿cómo diseñar y construir una aplicación orientada a objetos que implementa un motor de acceso a datos distribuido en Perl?

¡¡¡Saludos!!!

Hola. Fíjense que quería hacer un ordenamiento con Quicksort pero con un array, como por ejemplo el array @numero que contenga los valores num1, num2, num3, num4 y num5. Algo así:
@numero = ($num1, $num2, $num3, $num4, $num5);

Pero tiene que ser obligatoriamente con Quicksort. ¡De antemano gracias! :)

Hola.

Ando teniendo el siguiente problema porque tengo un archivo de texto llamado todo.txt.

El cual tiene
Hola X



Pero bueno todo bien

¿No?

El script Perl:

open (todo,"todo.txt")
@tor = <todo>;
close todo;

Pero mi duda es cómo puedo ordenarlos de manera que quede como una lista omitiendo todos los espacios desde el array. Quedando así:

Hola
X
Pero
bueno
todo
bien
¿No?

¿Alguien me puede ayudar?

Buenas tardes. Tengo que hacer un proyecto que consta de un buscador de patrones:

print "Introduzca el texto deseado\n\n";
$texto=<STDIN>;
chop($texto);
print "Introduzca el patron a buscar en el texto\n\n";
$patron=<STDIN>;
chop($patron);
if ($texto =~/$patron/)
{
print "si se encuentra el patrón de búsqueda en el texto \n\n";
}
else
{
print "no se encuentra el patrón de búsqueda en el texto";
}

Este es mi código. Éste ya me dice si el patrón ...

Bueno, resulta que programo con CGI::Application y quería usar el módulo SOAP::Lite.

Pero cuando cargo el servicio desde el WSDL me sale un error dependiendo dentro de qué procedimiento sea llamado. Ejemplo de error si lo pongo en pre_run:
sub cgiapp_prerun{

$self = shift;
$service = SOAP::Lite->service('http://127.0.0.1/PWPSOAP/WSDL/Service9999.wsdl');

}

Software error:
Unrecognized method 'prerun_mode'. List of available method(s): CambioContrasenaOp LogOutOp LogInOp


Y si lo pongo dentro del procedimiento start obtengo un error también
sub ...

Hola, buenas tardes. Estoy tratando de realizar un programa para realizar el formateo de un archivo separado por comas, pero me manda el siguiente error:
SCATQA$ ./prueba.pl Cat_CurInd.csv > Prueba.txt
./prueba.pl: syntax error at line 1 : `)' unexpected
el programa es el siguiente:
while (<>) {
@linea=$_;
chomp($linea);
@Sal=split(",",$linea);
printf ("%17s%30s%30s%30s%30s*\n", $Sal);
}

El archivo viene de la siguiente manera:
90_CHIHCB_09-2,Floating Amortizing Bond,CI_TIIE91,IRMXP_TIIE91,0
90_EDONL_03,Floating Amortizing Bond,CI_Cetes182_BI,IRMXP_Cetes_Sec_BI,0
90_EDONL_03-2,Floating Amortizing Bond,CI_Cetes182_BI,IRMXP_Cetes_Sec_BI,0
90_VRZCB_06,Floating Amortizing Bond,CI_TIIE91,IRMXP_TIIE91,0
90_VRZCB_08,Floating Amortizing ...

Buen día a todos,

En esta oportunidad requiero de vuestra ayuda para resolver un tema que me ha dado unos pequeños problemas. Tengo la siguiente expresión regular:

$ARGV !~ /\w+\\^+\.(C|c)(S|s)(V|v)/

Y quiero validar si el fichero loquesea.csv existe en la ruta especificada, por ejemplo:

C:\loquesea.csv o c:\carpeta1\carpeta2\carpeta3\loquesea.csv

He colocado esa expresión regular pero no realiza la validación,

¿Alguien podría ayudarme con ese tema?

Muchísimas gracias por vuestra acostumbrada ayuda.

Hace unos días me dejaron un proyecto en Perl. Este proyecto consiste en hacer un ordenador de números utilizando el método de quicksort. La otra parte del proyecto es hacer un buscador de patrones (ingreso un texto y un patrón de búsqueda, por ejemplo una letra, entonces el programa me tiene que decir cuántas veces aparece el patrón en el texto ingresado), el otro es un evaluador de expresiones. Si alguien me pudiera ayudar se ...