Foro - Perl en Español

«Bruno Contreras-Moreira:

Este taller recorre a lo largo de 5 sesiones algunas aplicaciones del lenguaje de programación Perl en tareas habituales de la bioinformática, apoyándose en CPAN, BioPerl y en herramientas esenciales (como UniProt), además de en recursos propios como la base de datos 3D-footprint.

Es un recorrido eminentemente práctico para estudiantes e investigadores que ya sepan programar y, aunque no sea imprescindible, interaccionar con sistemas operativos Linux. Este material se apoya en el curso ...

Hola.

¿Es posible saber desde qué script está siendo ejecutado un script de Perl?

Ejemplo: En mi script padre.pl llamo a mi script hijo.pl, ¿cómo puedo saber en hijo.pl el nombre del script que lo llamó?

Gracias

Luego de resolver el problema de DEFAULT, ahora no he podido obtener ese valor desde la plantilla. Lo que deseo es procesar ese valor en Perl. Ejemplo.

<TMPL_VAR NAME="PARAM" DEFAULT="100% Telch">

my $value = $self->param('PARAM');

print $value; # 100% Telch

Pienso que $value debería ser el valor DEFAULT que tiene la etiqueta en la plantilla pero no lo logro... ¿Alguien ha hecho algo similar o tiene idea de cómo realizarlo?

Hola. Alguien me puede orientar cómo encarar, qué módulos usar y cómo para realizar un servidor DNS.

Lo que quiero hacer es cuando alguien ponga por ejemplo wwww.perlenespanol.com lo atienda este servidor de DNS y según la IP de donde vino la petición le muestre la página o le asigna una página de error.

Gracias

En la ayuda pude leer:

You can assign a default value to a variable with the DEFAULT attribute. For example, this will output "the devil gave me a taco" if the "who" variable is not set.

The <TMPL_VAR NAME=WHO DEFAULT=devil> gave me a taco.

Pero cuando lo utilizo en mi template me genera un error.

HTML::Template->new() : Syntax error in tag

No se qué puede ser. La idea es colocar un valor por defecto ...

Hola. Espero que alguien sepa algo de Python porque estoy necesitando ayuda en esto
TTA123TTA124TTA125TTA126TTA

Lo que yo quiero es realizar una expresión regular para extraer los números que necesito
que vendrían a ser 123,124,125,126 (aunque en el caso real no es solo dígitos)

¿Alguien me sabe cómo hacerlo?

Hola, necesito ayuda. Tengo un código el cual se conecta vía ssh a una lista de equipos, pero si por algún motivo no puede conectarse el código no sigue a los otros equipos, sino que se cuelga y no continua, ¿qué puedo hacer? Tengo tiempo con esto y no he logrado solventarlo... si puedes ayudarme, gracias de antemano... Mi código es el siguiente:

($user) = ('usuario');
$pass = 'pas';
$ssh = Net::SSH::Perl->new($host);

$ssh->login($user, $pass);
if ...

¡ Hola Perleros !

Hace ya un tiempo que estoy metido en Perl, y ahora, armando un proyecto GPL, me doy cuenta que según la arquitectura que estoy planteando necesito que varias clases implementen una "interfaz" (por ahora estoy planteando una arquitectura genérica, pues no sé si existe esto en perl) como tienen otros lenguajes OOP.

La idea es, por ejemplo, poder decir: "MiClase implements MiInterface".

¿Se puede hacer esto en Perl? Estoy usando el ...

«Uno de los comentarios que recibí por el artículo anterior fue acerca de cómo se vería utilizando la sintaxis de MooseX::Declare.

Este módulo provee extensiones sintácticas que van mucho más allá del azúcar sintáctico regular de Moose. Utilizando la magia negra de Devel::Declare, MooseX::Declare crea toda una nueva sintaxis muy similar a la de Perl6, para declarar las clases y roles de Moose, sin embargo, el uso de estas extensiones me genera sentimientos encontrados.»

Artículo

«Buscando más sobre twitter y su API, encontré este cliente de twitter para consola llamado TTYtter. Básicamente consta de un shell que permite obtener los tweets más recientes y hacer búsquedas tal como se permiten en casi cualquier cliente de twitter, pero esta vez desde una consola en modo texto.

El mismo está escrito en Perl y está siendo actualizado con bastante frecuencia.»

Artículo