Foro - Perl en Español

Hola, ¿qué tal? Un saludos a todos.

Tengo un problema de búsqueda de cadenas con expresiones regulares que no he podido resolver.

Mi problema es el siguiente:

Archivo A:

130111000008; 0; 1298; 3; 2; 528311149166; 20986; 528311149166; 20986; 2; 0; 0
130111000008; 0; 1294; 3; 2; 526421096094; 20986; 526421096094; 20986; 2; 0; 0
130111000014; 0; 1294; 3; 2; 524434104460; 20986; 524434104460; 20986; 2; 0; 0
130111000015; 0; 1298; 3; 2; 526621011547; 20986; 526621011547; 20986; ...

Instalación de módulos y bibliotecas en Perl

Impacientes:
saltar a la sección Instalación en Linux o Instalación en Windows.

Las distintas distribuciones de Perl suelen venir acompañadas de una gran cantidad de módulos y bibliotecas. Pero
muchas veces necesitaremos usar módulos y bibliotecas que no estarán instaladas en nuestros equipos.
Aquí viene una explicación de cómo hacer esa instalación.

---

Documentación oficial: perldoc perlmodinstall

---

• Can't locate ...
• ¿Está realmente instalado?
• ...

Estimados,
Los molesto porque estoy intentando convertir un script .pl a exe y estoy obteniendo el siguiente mensaje, donde me indica que mi versión es muy reciente, ¿hay forma de decirle que lo convierta desde una versión más antigua?

c:\p2x-11.00-Win\perl2exe-11.00-Win>perl2exe.exe script.pl
Perl2Exe V11.00 2012-06-08 Copyright (c) 1997-2012 IndigoSTAR Software
ERROR: Invalid platform: Win32-5.16.1

Saludos

Hola:

Primero decir que soy absolutamente nueva en esto e intento hacer algo muy, muy simple.
He leído en el foro sobre el tema pero es demasiado complicado de entender para mi porque lo mio es el primer paso.

A ver: Intento mandar un correo.
Este es mi código:

use MIME::Lite;
my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'prueba',
Data =>"desde Perl"
) ;
MIME::Lite->send('smtp', "smtp.gmail.com", Timeout => 60 ) ;
$msg->send;

Y ...

Tengo este código:

#!/usr/bin/perl

BEGIN {
my $b__dir = (-d '/home/acertp3d/perl'?'/home/acertp3d/perl':( getpwuid($>) ).'/perl');
unshift @INC,$b__dir.'5/lib/perl5',$b__dir.'5/lib/perl5/i686-linux',map { $b__dir . $_ } @INC;
}

use CGI::Carp qw(fatalsToBrowser);
use warnings;

#Controlador del Admin
use lib('../');
#use lib '../libs';


use Datea::Casslc qw(:all);
print "Content-type: text/plain\n\n";

print "testing...\n";


y efectivamente, la respuesta es:

Can't locate Datea/Casslc.pm in @INC (@INC contains: ../ /home/acertp3d/perl5/lib/perl5 /home/acertp3d/perl5/lib/perl5/i686-linux /home/acertp3d/perl/usr/local/lib/perl5/5.8.8/i686-linux /home/acertp3d/perl/usr/local/lib/perl5/5.8.8 /home/acertp3d/perl/usr/local/lib/perl5/site_perl/5.8.8/i686-linux /home/acertp3d/perl/usr/local/lib/perl5/site_perl/5.8.8 /home/acertp3d/perl/usr/local/lib/perl5/site_perl /home/acertp3d/perl. /usr/local/lib/perl5/5.8.8/i686-linux /usr/local/lib/perl5/5.8.8 /usr/local/lib/perl5/site_perl/5.8.8/i686-linux /usr/local/lib/perl5/site_perl/5.8.8 /usr/local/lib/perl5/site_perl .) at index.pl ...

¿Qué tal? Tengo el siguiente problema:

Tengo un archivo de Excel en formato xlsx, el cual necesito leer algunas celdas del mismo y dependiendo de los valores que obtenga al realizar la lectura de las celdas tengo que escribir valores en otras celdas del mismo archivo. Una vez hecha la escritura tendría que guardar ese archivo con un nombre diferente al que abrí.

He estado checando el módulo Spreadsheet::Read, el cual me permite leer archivos ...

Hola a todos,

Necesito obtener las coordenadas de inicio y fin de los genes (guardados en formato FASTA) en el genoma completo (guardado en otro archivo FASTA). La idea es que vaya tomando la secuencia de los genes una por una, identifique la posición en el genoma y te devuelva las coordenadas de inicio y fin. ¿Alguien sabría guiarme sobre cómo hacerlo con un script en Perl?

Muchas gracias,

Berin

Buenos días.

Antes de nada, agradecer la ayuda que me puedan prestar.

Estoy intentando desarrollar un proceso que envíe un correo electrónico con un texto a una dirección determinada de GMail. Para comenzar esta tarea he ido viendo la información que hay en los foros de esta web, pero me he quedado un poco atascado, el correo no se envía y muestra mensajes de error.

Dispongo de una máquina virtual (VMWare Player) que tiene instalado ...

Creo un archivo xls con el módulo Spreadsheet::WriteExcel. Puedo verlo y se crea bien. Mi problema es que quiero abrir ese archivo desde un cgi, y este no se abre.


#!/usr/bin/perl -w

use strict;
use CGI ':all';
use Spreadsheet::WriteExcel;

# Suponiendo creado OK el archivo prueba.xls, Luego:

open (FILE, "/tmp/archivos_xls/prueba.xls");
local ($/);
my $file = <FILE>;
close (FILE);

print "Content-type: application/vnd.ms-excel\n";
print "Content-Disposition: attachment; filename='prueba.xls'\n";
print "Content-Description: File to download\n\n";

print $file;


...

Hola compañeros,

¿Cómo abrirías un fichero csv (datos.csv), eliminarías las comillas de los datos (columnas/filas), y reemplazarías las comas por puntos, y grabarías el resultado de nuevo en el fichero, y no por consola, en un script?

Saludos y gracias.