Foro - Perl en Español

Hola a todos los miembros de esta comunidad.

No sé si lo que quiero hacer sea una tontería, es más: no sé si será posible. Me explico:

Tengo una aplicación en Perl y MySQL, hospedada en una máquina que tiene Linux Ubuntu. Esta me funciona de maravilla.

Ahora bien, necesito hacer algo sencillo en mi Teléfono celular, que tiene Android, una aplicación muy chica que me permita consultar mis actividades deportivas o de trabajo para ...

Hola a todos.

Tengo un par de reportes en los que leo de una simple tabla y trato de desplegar todos los registros y funciona bien, solo que en ambos está omitiendo el primer registro.

¿Será cosa del controlador?

Odio Windows, pero así me lo pidió un cliente y ¡ni modo! Lo que el cliente pida.

Yo sé que en Windows se tiene que crear un origen de datos y estos son ODBC.
¿Alguien tendrá ...

Cortar secuencias desde un fichero GFF y un FASTA del genoma

Hola,

hoy cuento cómo cortar subsecuencias de un genoma correspondientes a elementos anotados en un fichero GFF asociado, que tienen este aspecto, con columnas separadas por tabuladores. A diferencia del formato BED, las coordinadas aquí empiezan a contar en 1:

1 proveedor gene 16399 20144 . + . ID=500;...
1 proveedor mRNA 16399 20144 . + . ID=500-01;Parent=500;...
1 proveedor exon 16399 16976 . ...

Hola,

hoy mi colega Najla Ksouri y yo teníamos que comprobar si dos versiones del mismo genoma, una de Phytozome y otra de Ensembl Plants, eran iguales en secuencia. Para eso usamos este one-liner Perl que hace una digestión MD5 de las secuencias desde un fichero en formato FASTA, donde cada secuencia va precedida de una cabecera o header, capturada en la variable $h:

Artículo

Hola,

un problema con el que tropecé recientemente al preparar un fichero .travis.yaml para un repositorio en GitHub es que algunos módulos Perl pueden fallar al ser instalados porque dependen de software adicional que no está instalado en el sistema operativo. La solución pasa por instalar esas dependencias antes de los módulos en cuestión, tal como se hace por ejemplo con libgd-dev en https://github.com/eead-csic-compbio/ge ... travis.yml

En esta entrada ...

¿Qué tal? Necesito deshabilitar los checkbox para que no puedan ser reelegidos y no logro terminarlo. Formo los textbox al consultar a una base de datos:

FORMACIÓN DE LA SELECCIÓN MÚLTIPLE:
print<<"html";
<div class="multipleSelection" align="left";>
<div class="selectBox"
onclick="showCheckboxes()">
<select>
<option>RELACI&Oacute;N DE ALARMAS</option>
</select>
<div class="overSelect"></div>
</div> <!-- <div class="selectBox" -->
<div id="checkBoxes">
html
while(my $ref_alarm = $sth->fetchrow_hashref()) {
($gabinete)=$ref_alarm->{'gabinete'};
($alarma)=$ref_alarm->{'descrip_alarma'};
print "<input type='checkbox' name='alarma' id='alarma' value='$alarma' onclick='alarma_sel(this.value);alarma_reg(this.value);'/>$alarma</input>";
print "<br>";
}
print "<td><div><textarea name='ver_alarmas' id='ver_alarmas' rows='4' ...

Hola a todos, necesito ayuda con un programa que estoy haciendo y hay algunas opciones que no tengo idea de cómo hacerlo.

Aquí dejo mi programa, espero me puedan ayudar :( me faltan las opciones 3, 6 y 7.

my @lista;
my $accion;
print "Menú:
1.- Agregar en cabecera.
2.- Agregar en cima.
3.- Agregar antes de.
4.- ¿Está vacía?
5.- Imprimir.
6.- Modificar.
7.- ...

Quisiera saber cómo puedo hacer para guardar varios nombres en un arreglo, uno por uno.

Por ejemplo: Que la consola me pida ingresar 5 nombres.

@lista;
print "ingrese nombres";
$nombres = <>; #que se repita 5 veces y que se guarde en @lista

He estado buscando cómo hacerlo con while pero todos los videos son con números y quiero que sea con nombres :(

Hola. Soy nuevo en Perl y me gustaría saber cómo inserto elementos a una pila uno encima de otros (apilar).
En el lenguaje c++ existe algo llamado nodos y es para ir agregando elementos y no sé cómo hacer eso en Perl. :(

Hola buenas tardes, estoy intentando calcular la Distancia de Hamming entre dos cadenas de distinta longitud, y la verdad es que no lo consigo, tengo problemas en las líneas comentadas.

El código no está terminado, pero necesito que me funcione esa parte, para continuar.

¿Alguien podría decirme por qué no me funciona? Muchas gracias.

#!/usr/bin/perl

use 5.010;
use strict;
use warnings;

my $name = 'Arturito, ';
my $email= '[email protected], ...