Foro - Perl en Español

Warl0ckpl comienza en Youtube un curso de programación Perl en Linux.

Hola

Tengo unos datos que analizar, en server-cpu-avg.csv (hay un ejemplo anexado), que luego formarán un fichero XML.

Creo que me he liado al construir el array y, aunque funciona, no sé quitar la primera línea (que serían los nombres de las columnas, que no me interesan para nada) y tampoco sé quitar las comillas. Sería algo así: s/"//g, pero no tengo claro dónde ponerlo en el código (todo esto lo quisiera hacer durante el ...

Hola. Doddy me dijo que prodían ayudarme con un problema que tengo con algunos scripts de Perl aquí :)

Cuando inicio este script con el cmd:
#!usr/bin/perl
#AOE2 Cheater 0.1
#Coded By Doddy H
#ppm install http://www.bribes.org/perl/ppm/Win32-GuiTest.ppd

use Win32::GuiTest qw(SendKeys);

head();

for my $se ( reverse 1 .. 10 ) {
sleep 1;
syswrite STDOUT, " Wait $se seconds \r";
}

print "\n\n Cheating ...\n";
cheatnow(); ...

«Normalmente, un script utiliza una serie de argumentos, como pueden ser el nombre de un fichero que debe leer, el nombre de un fichero de salida que debe generar, etc. Típicamente, en un entorno unix estos argumentos se especifican en la línea de comandos. Por ejemplo:
$ procesa.pl --fichero 'datos.txt' --salida 'informe.txt' --desde '2012-01-01' --max-lineas 1000

En este artículo vamos a ver cómo procesar en Perl los argumentos que se reciben de este modo, y ...

¡Que tal a todos!

Estoy intentando conectarme a un enrutador Cisco vía SSH con Perl, el problema que tengo es que como que no logro que se ejecute cualquier comando, siento que no se logra a conectar, la verdad quisiera ver si alguno puede ayudarme con este detalle que tengo; aquí les dejo mi código y el resultado que me arroja:

código:
#!c:\perl\bin\perl.exe
print "content-type: text/html \n\n";
$ENV{HOME} = $ENV{USERPROFILE};
use strict;
use ...

¡Hola!

Soy nueva en esto de la programación con Perl y ¡aún no consigo aclararme!

Mi pregunta es muy básica. ¿Podrían ayudarme a crear un programa que me compare dos archivos (la extensión de los archivos es ".tab")?

Este programa tiene que buscar el contenido de las celdas del archivo 1 (por ejemplo, el contenido de A1, A2, A3...) y buscar si está en el archivo 2 (búsqueda en todas las celdas de la columna ...

En la Universidad Autónoma de Barcelona, en el Servicio de Genómica Bioinformática, disponen de los cursos tradicionales:

• Introducción a la Bioinformática
• Desarrollo de software bioinformático y programación en Perl

además de cursos en línea:

• Una invitación a la Bioinformática
• Curso de introducción a la programación con Perl

Este último curso está disponible libremente y consiste en 10 ejercicios de dificultad creciente que te introducirán al lenguaje de programación Perl. ...

Syntax Error - 1.ai - at 1dotai.pl line 2, near "print print("Free Hosting for Geeks.\n");

Me salió ese error, no sabía que usarán Perl la gente de Google... ¡je,je!, aunque prefiero mil veces el nuevo Outlook que en ese gmail pues lo uso de vez en cuando y me salió eso por ahí.

Pero quizás sea solo una publicidad o quien sabe... que será.

Tengo el siguiente código en Ruby
logo=

def mostrar text
w="|"
text.each do |str|
str.scan(/./) do |c|
STDOUT.flush
if w=="|"
print "\b"+c +w
w="/"
elsif w=="/"
print "\b"+c +w
w="-"
elsif w=="-"
print "\b"+c +w
w="\\"
else
print "\b"+c +w
w="|"
end
sleep 0.04
end
print "\b "
puts ""
end
end

mostrar(logo)

Mi pregunta es si alguien me podría ayudar a traducirlo a Perl porque lo he intentado ...

¡Buen día!

Les comento mi problema.

A través de un webserver (siendo yo el cliente) obtengo un xml desde un servidor remoto. El archivo que recibo, teóricamente es un xml pero al darle un dump al archivo en si viene de esta manera

$VAR1 = {
'current_page_number' => '1',
'foreign_remote_system' => {
'identifier' => 'xxxxxxxxxxx',
'counter_id' => 'yyyyyyyyyyyy',
'reference_no' => '000000'
},
'last_page_number' => '1',
'xmlns:xrsi' => 'http://servidorremoto.com',
'number_matches' => '9',
'payment_transactions' => {
'payment_transaction' ...