Foro - Perl en Español

Hola, estimados. :D

Soy nuevo en el foro y recién comienzo a programar en Perl.

Les cuento tengo que hacer un programa que respalde archivos .pl dentro de un directorio en particular ingresado por el usuario al igual que el directorio donde quedarán los respaldos.

El problema mayor que tengo es que no me funciona la copia, para lo cual estoy utilizando el comando system("cp $_ ...

Hola, Perleros,

tengo un archivo multiFASTA con miles de entradas y quiero filtrarlo, en función del nombre de la secuencia, que incluye información relevante para el filtrado. La verdad es que estoy un poco perdido porque no sé cómo organizarlo ya que es un archivo fasta con miles de secuencias, y no sé si es buena idea guardar todo en variables.

El archivo es de la siguiente manera. En este ejemplo voy a incluir únicamente ...

Hola, empezaré diciendo que no tengo ni idea de Perl, me suena que es un lenguaje en el que las expresiones regulares son muy potentes y poco más.

Mi problema es el siguiente: tengo que exportar un catálogo de productos que está en PDF a CSV, adaptando algunos campos de información de los productos para dejarlo en el formato adecuado, como la referencia, el nombre del producto, la localización, etc.

Por eso, no tengo ni ...

Estimados, quisiera saber si me pudieran ayudar con este trabajo que tengo:


Escribir un aplicativo Perl que realice el respaldo de los archivos que contienen programas Perl ubicados en un directorio particular (entregado por el usuario) hacia un directorio diferente también entregado por el usuario. Considere que los archivos que contienen código Perl siempre comienzan con las siguientes líneas y tienen la extensión .pl:

#!/usr/bin/perl
#file <nombre del archivo>

El programa debe verificar las siguientes ...

Hola, necesito hacer los siguientes ejercicios en Perl... Espero que me ayuden.

1) leer un conjunto de datos (números) y mostrar en pantalla los números leídos que tengan un elemento (número) central par.

2) leer un número y su base y muestre en pantalla su equivalente en base 12.

Espero que puedan resolverlos... ¡Saludos!

Estimados,
Los contacto porque estoy tratando de armar un explorador de archivos y hasta el momento no pude lograrlo, con algunos ejemplos de Internet.

Mi idea es listar el contenido de un directorio y de todos sus directorios.

Digamos el famoso árbol de directorios.


+ directorio principal
-sub directorio
-- archivo 1
-- archivo 2
-sub directorio2
-- archivo 3

SAludos.

¿Qué tal? Buena tarde. Antes que nada: excelente foro. Ya me han resuelto varias dudas pero apenas me animé a inscribirme. Bueno, mi duda es la siguiente:

Tengo un script Perl. Dentro de él declaro variables que son algo así:

my $var=`comandobash`;
my $var2=`grep "$var" archivo`;

$var trae una cadena de texto extraída de un archivo. Ahora no entendía por qué $var2 no muestra lo que quiero. Cuando la imprimía noté que $var la interpreta ...

¿Hola? ¿qué tal?
Ya casi acabo mi programa, pero tengo un problema más. Ok, miren ustedes mi código, ya les digo cuál es el error:

#!/usr/bin/perl
system("clear");
use Term::ANSIColor;
system("clear");
print "\n";
my $jaca = 0;
my @animadd;
my @coment;
do {
print "Animals > ";
$animals__ = "--animals";
$exit = "exit";
$add_an = "add ani";
chomp( $usr = <> );
if ( $usr eq $animals__ ) {
system("clear");
print "\n\nTotal de animales: ", ...

Chicos, recurro a ustedes ya que tengo que hacer una tarea en la universidad y estoy algo complicado. Dejo escrito lo que tengo que hacer:

Ejercicio:
Usando Perl + contrab: hacer un script de respaldo,
el script debe crear un respaldo de un directorio,
el directorio por defecto es /root/Desktop, pero puede recibir
el nombre del directorio como argumento en la línea de comando.

¿Qué debe hacer?

Crear un zip con el contenido del directorio ...

Hola, me surgió el siguiente problema.

Recibo en un JSON unos parámetros de configuración para conectarme a un sftp o ftp en los cuales debo recorrer un directorio y colectar los archivos que tengan un determinado nombre. Para esto uno de los parámetros en el JSON es una regExp.

En una parte del código tengo lo siguiente:

foreach my $file (@files) {
if ( $file =~ $self->{regExp} ) {
print "$file machea con: " ...