Foro - Perl en Español

Hola:

El problema que tengo es que no sé por qué razón el programa no entra al while() que lee un archivo de texto.

Mi código es el siguiente:
my @titulo;
for(my $t=0; $t<$close;$t++){
my $destructinador=$outputs_R;
next if ! -f $destructinador;
my $armainador=$nombres_R;
open(DERECHO, "$destructinador")|| die "Error al abrir DERECHO $destructinador: $!\n \n";
open(IZQUIERDO, "$opts{o}/$armainador")|| die "Error al abrir IZQUIERDO $armainador: $!\n \n";
open(COMPLETO, ">$opts{o}/$armainador")|| die "Error al abrir COMPLETO $armainador: $!\n \n";
my ...

Tengo un programa con operaciones "Operaciones.pl", que instancia nuevos objetos o clases Operaciones::Division, Operaciones::Suma, etc... si el resultado de la operación se llevó con éxito se retorna el resultado de tal operación. Ejemplo: 6/3 = 2 (se retorna el 2), pero para el caso de que la operación haya fallado: 6/0 = No existe, se retorna un objeto que indica qué tipo de error es, de la forma Operaciones::Error(...).

Para el caso del retorno del ...

Muy Buenas:

Deseaba saber si alguien del foro, ha programado alguna vez un problema de estos (CSP) en Perl. Tengo entendido que en Prolog es facilito, pero deseo, como ya suponen, hacerlo en Perl.

He buscado en CPAN, sobre algoritmos implementados, pero no encontré lo que buscaba.

Espero sus comentarios ;)
Saludos

Muy pocas veces hacemos reseña aquí de nuevos módulos en CPAN, o de aquellos que nos llaman la atención, pero hoy he visto uno que me ha llamado mucho esa atención.

Se trata de Java-2Perl6API, un traductor de Java a la API de Perl6.

Estoy muy intrigado con esto. ¿Realmente funciona?

Hola perleros,

estoy intentando instalarme el módulo GD::Graph::bars en mi máquina Linux y no consigo hacerlo porque hay un programa que lo requiere que no me funciona. Para instalar el módulo, me lo he bajado de CPAN, lo he descomprimido y dentro de este directorio he ejecutado los siguientes comandos

$ sudo perl Makefile.pl
$ make
$ sudo make install

el error que salta es algo como:

can't locate GD.pm in @Inc

¿Alguien me puede ...

Estoy generando archivos PDF con el módulo PDF::API2, y no encuentro qué es lo que debo setear, o qué atributo indicar, para que el archivo generado NO pueda ser modificado una vez creado.

Les agradecería muchísimo algún tipo de ayuda. :D

El próximo día 29 de julio, con motivo de la salida de Rakudo Star, los Perl Mongers de Barcelona celebrarán un "suculento" menú, en la ya conocida sala C6-E101 del edificio C6 del Campus Norte de la UPC.

Perl.com estaba bajo el paraguas de O'Reilly, pero poco a poco lo ha dejado morir, hasta el extremo de que hacía mucho tiempo que no se publicaban nuevos artículos.

chromatic, desde el día 21 de julio, ha retomado la tarea de ponerlo bajo el paraguas de Perl.org, (que, a propósito, recibió un lavado de cara tremendo hace unos meses). Se mantendrán los artículos publicados durante estos años, mientras que chromatic se compromete a publicar un ...

«Moose es un posmoderno sistema de objetos para Perl 5 que termina con el tedio de escribir orientado a objetos en Perl. Toma prestadas todas las mejores características de Perl 6, CLOS (Lisp), Smalltalk, Java, BETA, OCaml, Ruby y más, mientras se mantiene fiel a sus raíces en Perl 5.

Moose está preparado al 100% para producción y en uso intensivo en un cierto número de sistemas, y creciendo día a día. ¡Pruébalo hoy!»

http://moose.perl.org/

.pick
say @mazo.pick(); # escoge una carta, cualquier carta...

say @mazo.pick(5); # mano de poker

my @barajado = @mazo.pick(*); # aquí, '*' significa 'sigue adelante'
# Quiere decir que extraemos todas las cartas del mazo,
# de forma aleatoria, y las guardamos en @barajado

my @urna = <negra blanca blanca>; # cuentas de colores, 1/3 negras, 2/3 blancas
.say for @urna.pick(50, :replace); # devolvemos a la urna la cuenta extraída
# Quiere decir que ...