Foro - Perl en Español

Necesito crear un hash con la siguiente estructura


tengo1 => aca1 => "test"
aca2 => "test"
aca3 => "test
aca4 => "tipo" => "uno"
=> "tipo1" => "dos"

tengo2 => aca1 => "test"
aca2 => "test"
aca3 => "test
aca4 => "tipo" => "uno"
=> "tipo1" => "dos"


El problema es no lo quiero hecho sino que necesito entender cómo hacerlo paso a paso.

¿ Alguien me puede ayudar ?

Hola. Tengo un problema con el resultado final de mi código:

#!/usr/bin/perl

use strict;
use warnings;

use utf8;
use locale;
use open OUT => ':locale';

use Net::SSH::Expect;

my $ssh = 'Net::SSH::Expect'->new(

host => 'mihost',
password => 'contrasena',
user => 'usuario',
port => 23,
raw_pty => 1
);

my $login_output = $ssh->login();
if ( $login_output !~ /Welcome/ ) {
die "Login has failed. Login output was $login_output";
}

$ssh->exec("stty raw -iutf8");
$ssh->exec("stty raw -echo");

print ...

Tengo un problema con este módulo porque no puedo usarlo para parsear un archivo, porque lo que quiero es abrir el contenido de un archivo html local y guardarlo en una variable para después usar este módulo, pero este modulo requiere combinar el uso de LWP:UserAgent y no es lo quiero.

use HTML::Form;

$texto = "<form> bla bla bla"; # contenido de algún archivo

my @test = HTML::Form->parse($texto);

print $test->method."\n";


¿ Alguien me ...

Estimados:

Busqué en el foro alguna forma de descargar un archivo Excel, y encontré Esto.

Lo modifico para poder descargar un .xls, ya que el .csv retorna una tabla con comas. Esto lo logro utilizando Spreadsheet::Write.

print "Content-Type:application/vnd.ms-excel; name=prueba.xls\r\n";
print "Content-Disposition: attachment; filename=prueba.xls\r\n\n";

my $aux;

open( FILE, "</tmp/prueba.xls");
while($aux=<FILE>)
{
print("$aux");
}

El problema es que no aparece nada en el archivo Excel, todo vacío. He probado montones de formas, pero nada :s. No ...

Gente,
Los molesto para consultarles si conocen algún dumper, donde yo pueda pasarle un string y que éste me entregue los resultados de pastebin.

Me hice uno con Google pero quería usar en realidad el search de Pastebin.

Saludos.

Los Bancos, siempre intentando incrementar sus beneficios, piden a los expertos programadores por un sistema que pueda leer cheques de banco; esto haría el procesado de cheques mucho más barato. Uno de sus ideas era usar reconocimiento óptico de caracteres (OCR) para reconocer cuentas de bancos impresos usando segmentos de 7 líneas.

Una vez que el cheque ha sido escaneado, otro software de procesado de imagen convertirá las barras verticales y horizontales a barras '|' ...

Hola a todos...

Soy nuevo con Perl. Está excelente esta página.

Empecé a usar Perl porque necesito interactuar con un script de shell. El script es el instalador de una aplicación, y al ejecutarlo pide ingresar algunas opciones por teclado. Pero mi intención es que estas opciones se ingresen automáticamente.

Esto es lo que escribí:
#!/usr/local/perl -w

$linea = 1;
open(INSTAL,"|/root/Desktop/if_compiler/install.sh");
while(INSTAL && $linea<13)
{
print $linea;

if ($linea==1)
{ print INSTAL "1\n";}
if ...

Vídeo (en inglés) de los primeros pasos para usar el depurador integrado de perl.

¡AYUDA! Estoy todavía con un proyecto de tesis y necesito que se imaginen un programa que les gustaría que alguna empresa de software les desarrollara y luego escriban una carta sencilla (como si estuvieran mandando un e-mail) describiendo cómo quieren su sistema, esto con el fin de tener muestras.

Pueden escribir como si se tratase de particulares o van en representación de una empresa.

Ejemplo:

«Hago uso de este medio en representación de la empresa ...

Hola, buenas tardes,

Mi caso es el siguiente: mi sistema consta de dos pantallas; una en la cual, a través de un formulario recopilo información para procesarla, y luego en la segunda se muestra un reporte.

En la primera pantalla estoy recogiendo la data de mi base de datos en MySQL con la ayuda del módulo DBI y la guardo en una variable. El problema está en que cuando el sistema va a mi pantalla ...