Foro - Perl en Español

Hola, tengo una duda: quisiera saber para qué sirven las funciones last, next, y redo. Estaba buscándolos en la sección tutoriales y no lo encontré.

¡¡Hola a todo el mundo!!

Soy principiante totalmente en el lenguaje Perl y estoy empezando gracias a una asignatura de bioinformática que tengo este cuatrimestre. Mis conocimientos me han permitido medio solucionar un problema que nos han propuesto. El problema en sí es el siguiente: partimos de un árbol filogenético expresado de la siguiente forma (por ejemplo):

(Mur: 0.98798,((((Ba3n: 0.77637,CA3: 0.24356),H: 0.99877),G: 0.77892),J: 0.99872),Gi: 0.88982);

El objetivo es eliminar las distancias de cada especie (los ...

Ejercicio a presentar en la convocatoria de Enero de 2010.
Informática - Biotecnología. Universidad de Salamanca.

Construir el programa pep2dna.pl que se ejecutará con la siguiente sintaxis:

perl pep2dna.pl fichin1 fichin2 fichout linesize

Funcionamiento
El programa pep2dna.pl recibirá como primer argumento un nombre de fichero (fichin1) que contendrá un número variable de secuencias de DNA, seguidas de su traducción a secuencia de aminoácidos, siguiendo el formato que puede verse en los ficheros de ejemplo en ...

Hola gente, es una tontería pero tengo un script que dejó de funcionar ya que trabaja con fecha y en este caso el mes es enero el cual figura como ' 1' sacándolo con
my $mes_actual = $fechabucle->month();

¿Cómo puedo hacer para que figure automáticamente como '01'?

Las fechas antes del mes 10 figuran con un solo dígito.

Hola, soy nuevo en Perl, y me surgió una duda: tengo un archivo de texto con varias fechas de la siguiente manera:

29/11/2009
02/12/2009
06/12/2009

Mi pregunta es, cómo puedo hacer que Perl cree 8 variables, una por cada número, es decir, si tengo 29/11/2009, cómo puedo hacer que Perl asigne algo así por cada fecha:

$a = 2
$b = 9

$c = 1
$d = 1

$e = 2
$f = 0
$g ...

Buenas a todos,
Tengo una duda sobre la ejecución de comandos shell en Perl.
¿Podría alguien completar el siguiente código?

foreach (`COMANDO`)
{
if (RETORNO DEL COMANDO CONTIENE /Asterisk/)
{
$output=RETORNO DEL COMANDO;
}
}

Buenas:

Quiero convertir un archivo csv a otro formato y al intentar cambiar un valor me da el error del título:
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use Text::CSV_XS;

my $csvobj = Text::CSV_XS->new();

my $csvfile = "/tmp/test.csv";

open CSV, "<", $csvfile or die "cannot open $csvfile: $!\n";

# let's parse the file
while (<CSV>) {
next if !/\S/ ; # skip blank lines

$csvobj->parse($_) or die "can't parse: ". $csvobj->error_input();
my @fields = ...

Programación Perl (DTP-250)

Objetivo
Las personas que realicen el curso aprenderán a:

* Escribir secuencias de comandos que creen y cambien variables escalares.
* Usar estructuras de control de bifurcación o bucle.
* Crear y cambiar matrices de variables.
* Crear y cambiar variables de hash.
* Leer los archivos especificados en la línea de comandos y buscar determinadas cadenas de texto en esos archivos.
* Ejecutar pruebas de expresiones regulares y reconocer referencias a ...

«Las técnicas y el estilo en la programación es una de esas cosas que van cambiando con el tiempo, como Perl permite extender el lenguaje con facilidad, se forma un círculo evolutivo cuando a su vez las extensiones popularizan nuevos estilos de programación.

Hoy intento dar un rápido vistazo a varias maneras de programar en Perl que he utilizado durante los años, con la esperanza de que podáis apreciar las ventajas del estilo de la ...

Estoy tratando de generar un código de barras que tiene que ser con el font c39hrp24dhtt.ttf y no encuentro una librería que la contenga.

Gracias.

PD: Adjunto font