Foro - Perl en Español

Aquí hay una introducción (vídeo, en inglés) sobre SDL Perl, por Douglas E. Miles.

«John McCarthy, más conocido por ser el creador del lenguaje de programación Lisp y del término inteligencia artificial, falleció ayer (24/10) en California, a los 84 años. Este veterano pionero de la informática moderna trabajó durante décadas en Stanford, el M.I.T., Darmouth y Princeton, entre otros sitios. Entre los reconocimientos que recibió se incluyen un Premio Turing en 1971 (el equivalente al premio Nobel de informática) y la Medalla Nacional de las Ciencias en 1991. ...

Ejemplo de cómo generar todas las posibles combinaciones de secuencias sinónimas para la proteína MALVSREGPT más un codón de paro que es '>'.

#!/usr/bin/perl
use common::sense; # Hay que tener sentido común

#use Modern::Perl; # Somos modernos
#use utf8;

use open qw(:utf8 :std); # Terminal en modo utf8
use autodie; # Es mejor morir que regresar con deshonor (proverbio Klingon)

my %código_genético = (
'AAA' => 'K',
'AAC' => 'N',
'AAG' => 'K',
'AAT' ...

Desde hace unas semanas, Gabor Szabo publica (en inglés) en la web http://perlweekly.com/ un resumen de lo mejor y más importante que ocurre en la comunidad Perl: actividades y discusiones en los foros, nuevas webs, nuevos proyectos y propuestas, anuncios, etc.

Hola,

Tengo un script Perl que funciona correctamente en Linux y Windows. Este script hace un control de caracteres de un documento.

Pues en Solaris, pensé, ira igual de bien, pero, sorpresa para mi, no funciona igual de bien. Lo problemática es que el fichero solución lo crea en Latin1 cuando en los otros sistemas lo hace en utf8 (mismo código). ¿Qué puede ser? ¿Alguna idea?

Mil gracias.

Me sale este error

Can't call method "process" without a package or object reference at libs/CGI/Application/Plugin/TT.pm line 314.

Estoy usando cgi-app y el plugin de TT pero no sé por qué me sale ese error... y me lo indica en el propio módulo del plugin.

Solo tengo esto en un método:

sub myrunmode {
my $self = shift;

my %params = (
email => '[email protected]',
menu => [
{ title => 'Home', href ...

Hola, me gustaría aprender un lenguaje más que no sea Perl y me puse a pensar en qué lenguaje me conviene más, C o Java. Pensé en Java porque se habla mucho de él y se rumorea que es el más usado últimamente. También pensé en C, ya que se dice que es muy poderoso aunque C no tiene tanta facilidad para interactuar con Webs como lo hace Perl.

Así que, ¿qué opinan ustedes?

Hola, buenos días, estoy incursionando un poco en el mundo del desarrollo orientado a objetos con Perl, y he sido referenciado por varias vías a utilizar el módulo DBIx::Class para interactuar con mi DB. He comenzado a leer la documentación, pero siempre me ejemplifican con SQlite. Quisiera saber cuál es el protocolo para hacer funcionar mi DBIx::Class con PostgreSQL, debido a que es el gestor que normalmente utilizo. Si alguien tiene algún ejemplo, lo agradecería. ...

Hola, ando queriendo hacer un sustituto de netcat en Perl para la opción de mantener un puerto abierto para recibir datos. La idea sería que sea como el comando -lvvp de netcat.

El código del server que vendría a ser el sustituto de netcat sería el código siguiente:
#!/usr/bin/perl -w
# serverIO.pl - a simple server using
# IO::Socket
use strict;
use IO::Socket;
my $sock = new IO::Socket::INET(
LocalHost => 'localhost',
LocalPort => 7890, ...

¡Buenas!

Estoy teniendo problemas a la hora de usar un switch: dado un dato, debo realizar una u otra acción. El problema es que el dato a veces es 0, y cuando es cero, entra en when 0, pero me he encontrado que, ante una entrada defectuosa de un usuario o por cualquier otro motivo, si $var vale abc, entra en when 0, y luego en default.

¿Por qué está pasando esto?

chomp(my $var=<STDIN>); ...