Foro - Perl en Español

Buenas noches.

¿Alguien me podría apoyar, por favor? Estoy tratando de crear un usuario y contraseña (en MD5) en una tabla de MySQL.

Crear.pl:
use DBI;

my $nombre = "test8";
my $passwd = "123456";
$passwd = unix_md5_crypt $passwd;

my $dsn = "DBI:mysql:database=basetest;host=127.0.0.1";
my $dbh = DBI->connect($dsn, "usertest", "123456");
my $sql = $dbh->prepare('INSERT INTO users VALUES (?,?)');
my $res = $dbh->selectcol_arrayref($sql, undef, $nombre, $passwd);

$res->execute() or die $DBI::errstr;
$yes->finish();

Si crea el usuario [sql ...

¡Hoy mismo! ¡A las 19:00!

http://www.meetup.com/es/barcelonapm/ev ... =227452362

Pues ya está aquí: una primera versión definitiva de Perl 6.

En concreto, se trata de un Rakudo v2015.12, implementando una versión de Perl 6.c

Descarga e instalación: http://perl6.org/downloads/

Este es el lanzamiento "Christmas" de Rakudo Perl 6. Esta versión del compilador implementa la especificación v6.c “Christmas” del lenguaje Perl 6. La comunidad Perl 6 ha estado trabajando en este lanzamiento los últimos 15 años. Juntos, han construido un ...

Hola, gente. Estoy aprendiendo bioinformática con Perl.

Estoy haciendo un programa en Python pero mi profesor me lo pide en Perl y todavía no lo domino mucho. ¿Alguien me podría ayudar?

Aquí tenéis el código: https://gist.github.com/anonymous/5138c61c41fb985c7837
sequence = 'TAAAGACTGCCGAGAGGCCAACACGAGTGCTAGAACGAGGGGCGTAAACGCGGGTCCGAT'

def skew(sequence):
c = 0
g = 0
min_skew = 0
skew_list =
index = 0
for i in sequence:
index += 1
if i == 'C':
c += 1
if i == ...

Hola. Yo uso para Perl la licencia artística en mis proyectos. Ahora quiero usar una licencia parecida en mis códigos Delphi, pero me parece que la licencia artística es solo para Perl:

With this clause present, it is called the Artistic License (Perl) 1.0 (abbreviated as Artistic-Perl-1.0. With or without this clause, the license is approved by OSI for certifying software as OSI Certified Open Source.
One such example is the Artistic License (Perl) 1.0. ...

Saludos, requiero copiar el resultado de una sentencia SQL a un archivo pero me arroja error porque al parecer no está bien la sintaxis. Les agradeceré me indiquen la sentencia correcta:

COPY (select * from c_equipos order by clase,id_tipo_compon,nombre_equipo) TO '/var/lib/pgsql/data/test.copy';

El error que envía es:
ERROR: error de sintaxis en o cerca de «(» at character 6
LINE 1: COPY (select * from c_equipos order by clase,id_tipo_compon

Gracias.

El siguiente código está mal. Mi intención es hacer un comparación de 3 (o más) variables e imprimir cuando todas son iguales, pero quiero hacerlo de forma más corta sin if anidadas, y si es posible sin módulos.

my @a = 1;
my @b = 1;
my @c = 1;

if (@a == @b == @c){
#print si todos son iguales
#no print si uno es diferente
}

¿Podría existir una solución elegante para ...

Hola, les agradeceré me recomienden algun sitio donde pueda descargar un manual de jQuery.

Gracias.

Hola

Tengo un archivo con coordenadas de ciertos cromosomas:
chr1 11845753 11845846
chr1 11845856 11846102
chr1 11846102 11846209
chr1 11846209 11846508
chr1 11846522 11846718
Estas coordenadas se corresponden con exones de diferentes genes. Necesito relacionar cada posición con el exón y el gen correspondiente, para imprimir algo como:
chr1 11845753 11845846 Exon1_GenX
chr1 11845856 11846102 Exon2_GenX
chr1 11846102 11846209 Exon3_Genx
chr1 11846209 11846508 Exon1_GenY
chr1 11846522 11846718 Exon2_GenY
Manualmente lo haría yendo al NCBI o ...

Hola chicos.

Mi enhorabuena por el foro y aquí va mi consulta.

Estoy escribiendo un parser en perl para markdown y posteriormente convertirlo a BBCode, sin embargo me quedo bastante bastante estancado.

Este es el código que he escrito hasta ahora, se encarga de transformar los bloques cabecera (H1, H2, H3, H4, H5, H6) en el equivalente de
donde Ypt es un valor entre 60 y 10. Así, por ejemplo, un bloque del ...