Foro - Perl en Español

Hola a todos.

Tengo un problema con unos módulos instalados vía PPM y a mano.

El caso es que no los localiza cuando compilo el script (utilizo un script de ejemplo del propio módulo cogido de CPAN).

He cargado a el path a mano a través de use lib porque éste no está en la variable por defecto @INC, pero aun así no logro que lo localice.

#!/usr/bin/perl
use lib '/opt/ActivePerl-5.12/site/lib/auto/Net';
use Net::Divert;
En ...

Quisiera una orientación, les explico mi caso:

Tengo unos datos en una base Oracle.

Al momento de imprimirlos por pantalla algunos de estos datos vienen con parámetros raros (ej:锟斤拷一锟斤拷楼锟斤拷锟斤拷锟斤拷式锟斤拷锟). Si uno elige manualmente la opción de codificación en Chino Simplificado (GBK) en el navegador (FireFox) estos datos se muestran bien.

Ahora, me gustaría hacer una condición antes de imprimirlos que dijera que si vienen caracteres raros hacer una codificación a Chino Simplificado e imprimirlos.

¿Se ...

Estimados,

Ya me arden un poco las pestañas ¡así que espero a que me ayuden!

Necesito generar un script en Perl que pueda generar en forma masiva usuarios en Windows. Les comento que el comando para ejecutar esto en Windows es NET USER y ejecutándolo por línea de comandos en Windows sería así:

net user (usuario) /add

El tema está es que eso solo me sirve para generar un solo usuario por comando y necesito ...

«Damas y caballeros, bienvenidos a mi particular universo laboral.»

Artículo

«Bienvenidos al portal de vídeos de docencia de Bioinformática, los cuales resultarán muy útiles para estudiantes de esta asignatura en la UPO y en otras universidades españolas. Aquí intentaré subir de vez en cuando vídeo-tutoriales sobre herramientas de bioinformática, incluidos lenguajes de programación o sistemas operativos como Linux, que pueden ser de interés para iniciados en la materia.»

Canal

«En este vídeo se muestra cómo se instala el emulador de Linux Cygwin para instalar en cualquier sistema operativo Windows. Asimismo, se muestra también cómo instalar el intérprete del lenguaje de programación Perl y el comando ‘more’, para usarlos también dentro del terminal de comandos de Cygwin.»

Artículo

Hola,

Tengo la siguiente función:

sub GetAddressesNotInMailList {
my $self = shift;
my $MailListID = shift; # mandatory

$self->{MSG} = "";
my $Addresses = undef;

unless( defined $MailListID ) {
$self->{MSG} = "Mandatory Input Arguments are not defined";
$self->{LOG}->error("GetAddressesNotInMailList: ".$self->{MSG});
} else {
my $Members = undef;
$Members = $self->GetMembersOfMailList( $MailListID );
if( defined $Members ) {
my $num_res = keys %$Members;
$self->{MSG} = "Number of members of \"$MailListID\" mail list is $num_res";
$self->{LOG}->log("GetAddressesNotInMailList: ...

Hola.

Ando queriendo saber cómo calcular el porcentaje de descarga de un archivo.
Pues tengo este código:
use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12");
$nave->timeout(5);

if (download("http://127.0.0.1/bones.rar","bones.rar")) {
print " file downloaded\n";
}

sub download {
if ($nave->mirror($_,$_)) {
if (-f $_) {
return true;
}}}

Pero no sé cómo calcular la cantidad descargada del archivo poniendo el porcentaje de 1 al %100.

¿ Alguien me ...

Buenas tardes,

He creado una librería .pm que quiero emplear en un script .pl
Cuando ejecuto el script me aparece el siguiente error:

Can't locate loadable object for module infovista in @INC (@INC contains: /usr/local/ActivePerl-5.6/lib/5.6.1/sun4-solaris-thread-multi /usr/local/ActivePerl-5.6/lib/5.6.1 /usr/local/ActivePerl-5.6/lib/site_perl/5.6.1/sun4-solaris-thread-multi /usr/local/ActivePerl-5.6/lib/site_perl/5.6.1 /usr/local/ActivePerl-5.6/lib/site_perl .)

¿Qué debo hacer para poder utilizar la librería?
Saludos y gracias

«Los dispositivos de eye tracking son caros. Dan un rendimiento excepcional para analizar a dónde miran los visitantes de un sitio web, pero a veces es difícil justificar la inversión. Si consigues convencer a tus testers para que hagan clic en el punto al que miran, puedes sacar conclusiones…»

Artículo