Foro - Perl en Español

Hola, soy nueva en el foro y en Perl... Estoy haciendo un curso y llegamos al punto "Módulos para aplicar expresiones regulares" y lo primero que mandan es instalar el módulo Regexp::Common ejecutando lo siguiente:

sudo perl -MCPAN -e "install Regexp::Common"

La cosa es que lo ejecuté desde varios directorios y siempre me da el mismo error:

"sudo" no se reconoce como un comando externo o interno, programa o archivo por lotes ejecutable.

Trabajo con ...

Buenos días a todos.

Una pregunta rápida y sencilla: a la hora de realizar una clase el nombre de la clase tiene que coincidir exactamente con el nombre del archivo, añadiendo a este la extensión .pm, ¿verdad?

Me solicitan si es posible (no lo saben seguro) que el nombre del paquete sea por ejemplo este:

package Intercambio;

y el nombre del archivo correspondiente sea "Intercambio.class.pm" para poder llamarlo y usarlo así:

use Intercambio.class; ...

Hola, estoy empezando un proyecto de FreeLance y quería implementarlo en este Framework, pero no encuentro un Hosting que me de soporte a esto y cuando les pido que lo coloquen indican que no es posible, porque no es posible usarlo, ¿alguno sabe de algún buen Hosting? De ante mano muchas gracias por la ayuda.

Hola. Tengo el siguiente problema: hice un pequeño código para interpretar un pdf y pasarlo a un cvs. Todo me funciona perfecto pero, al recorrer la página buscando los datos y se topa con una 'ñ' se salta a la línea siguiente y no muestra la información de esa línea, ilustro con ejemplo:

Nombre Nota Sexo Direccion Ciudad

Juan Luis Castro 1929 Hombre Los Boldos Santiago
Rodrigo Flores 1834 Hombre Siena 12 Valparaiso
Miguel Yañez ...

Hola, pues tengo un problema al ejecutar desde mi servidor Apache un script en Windows. El código es el siguiente:

#!c:/perl/bin/perl.exe
use Win32::OLE;

if ($ENV{'REQUEST_METHOD'} eq 'POST') {

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});

@pairs = split(/&/, $buffer);

foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%()/pack("C", hex($1))/eg;

$FORM{$name} = $value;
}

eval {$ex = Win32::OLE->GetActiveObject('Excel.Application')};
die "Excel not installed" if $@;
unless (defined $ex) {
$ex = Win32::OLE->new('Excel.Application', sub ...

Quiero que el código (literal) que se muestra debajo de las barras se expanda (que ocupe el largo de todas las barras, de punta a punta) y no logro hacerlo con ayuda de las características del módulo :?



Cómo pueden ver en la documentación del módulo, las características me permiten los siguientes cambios:

font "large" Font (**) for the text at the bottom
font_margin 2 Pixels ...

Hola, amigos. Necesito un poquito de ayuda en este caso. Lo que hice es que tengo un menú (do) y tengo algunos comandos, y necesito que el usuario cuando ponga

fav_url http://perlenespanol.com/

que "http://perlenespanol.com" se agregue a una lista de mis web favoritas...

my $url = 0;
do {
my $fav = "add fav_url ";
printf("I-ExploiT !¡> ");
chomp( $opt = <> );
if ( $opt eq $fav ...

Mi problema pueden ser las variables de entorno que están inicializadas...(concretamente JAVA).

Tendría que inicializar en un script de Perl lo siguiente:

PERL5LIB=/home/unarutaxx/bibliotecas/perl;
JAVA_HOME=/usr/java5_64/jre

y agregar a la variable de entorno UNIX "PATH"=$JAVA_HOME/bin

El problema es que para el usuario que ejecuta no están inicializadas, esas variables...

Lo que quiero hacer es que cuando ejecute un proceso de Perl, inicialice esas variables para que no rompa el proceso...

Gracias de antemano...

#!/usr/bin/perl
print "Ingrese la cantidad de números en el conjunto:";
$n=<stdin>;
$i=0;
$x=1;
while($i<$n)
{
print "Ingrese el número $x:";
$x=$x+1;
$num=<stdin>;
$dat=$num;
$i=$i+1;
}

$i=0;
$sum=0;
while($i<$n)
{
$sum=$sum+$dat;
$i=$i+1;
}
$prom=$sum/$n;
print "El promedio es $prom\n"


$i=0;
$max=$dat;
$min=$dat;
while($i<$n)
{
if($max<$dat)
{
$max=$dat;
}
if($min>$dat)
{
$min=$dat;
}
$i=$i+1;
}
print "El número máximo es $max\n";
print "El número mínimo es $min\n";


$i=0;
while($i<$n)
{
$j=0;
$frec=0;
while($j<$n)
{
if($dat==$dat)
{
$frec=$frec+1; ...

¡Buenos días!

Soy nuevo en el foro. Mi nombre es Adrián.

Quería hacerles la siguiente pregunta:

Estoy intentando ejecutar un .pl pero al hacerlo me devuelve el siguiente error:

perl: symbol lookup error: /usr/lib64/perl5/site_perl/5.8.8//x86_64-linux-thread-multi/auto/Data/Dumper/Dumper.so: undefined symbol: Perl_Tstack_sp_ptr


¿Alguien sabe por qué puede ser?


Desde ya, ¡muchas gracias!

¡Saludos!