Foro - Perl en Español

Hola:

No lo entiendo, esto lleva funcionando casi 8 meses sin fallar ni un día y hoy ha fallado. Es un programilla que se conecta a la página de El País, se baja ciertos cómics y me los envía por correo.


#!/usr/bin/perl

use strict;
use warnings;
use WWW::Mechanize;

my ($url,@links,$mech,$vineta);

$url = "http://www.elpais.com";

$mech = WWW::Mechanize->new(autocheck =>1);
$mech->get($url);

getlink("El Roto");
getlink("Romeu");
getlink("Forges");

# getlink() gets as first and only parameter the name of a ...

Buenas, necesito ayuda. Tengo un array con nombres como elementos. Necesito un programilla que me saque las veces que está cada nombre en el array.

Y si puede ser, que los saque en otro fichero, mejor.

Gracias.

Tengo un problema con la entrada de datos desde la línea de comandos.

Mientras que en el ordenador de casa funciona perfectamente el programa, al cargarlo en otro ordenador, el programa sale y no da ningún resultado.

He intentado cargar un programilla más sencillo, pero nada.

¿A alguien se le ocurre que narices puede haberme hecho perder toda la mañana?

if ($ARGV) {
$entrada = $ARGV;
print $entrada;
}
if (!$ARGV) {
print "Sigue sin ...

Hola de nuevo a toda la gente enrollada de este foro, me surge una nueva duda en mi avance hacia el conocimiento exhaustivo de Perl ("creo que nunca llegará........snifff.......").

El caso es que no encuentro ningún sitio, donde se exponga una diferencia realista entre el comando grep y =~ de Perl.

Mi problema concreto es cuantificar las coincidencias en un fichero de texto, ya que:

use File::Slurp;

@file = read_file ("lo que sea");
for (@file) ...

Saludos, estoy haciendo unos scripts en Javascript para Grease Monkey, pero me estoy dando cuenta de que es bastante limitado, así que se me ocurrió que tal vez podría hacerlos en Perl.

¿Hay alguna posibilidad de que así sea? Por ejemplo hacer un script en Perl que teniendo una ventana abierta busque en ella un link y haga click (no de modo transparente) en él?

Tal vez sea una burrada pero tenía que preguntarlo ...

Hola amigos de expertos de Perl, ando buscando una función que sea capaz de dividir archivos. Les explico.

Leo un documento el cual tiene

Code: Seleccionar todo

fila 1: andres;felipe:cristian;
fila 2 set:rtyui:ddds:dfg;

Sé qué hay una función que sería capaz de mostrarme en un arreglo algo así:

Code: Seleccionar todo

$a= andres:felipe:cristian;
$b= "funcion que no conozco" (": , $a);

fila 1
a
n
d
r
e
s

campo
f
e
l
i
p
e

etc...

¿Alguien me puede decir ...

Hola.

Necesito hacer un programa que se conecte a esta página:

http://onlae.terra.es/loteria/navidad07/PrincipalD.htm

y después haga consultas de números de forma automática (por ejemplo del 10000 al 10999), y almacene los datos que devuelven las consultas en un archivo de texto.

¿Es esto posible con Perl? Si es así, ¿algún experto puede orientarme de cómo hacerse?

¡Gracias!

¡Hola!

Soy nueva en Perl y he tenido que cambiar unas fechas con formato como

Code: Seleccionar todo

01-DEC-2010

a formato

Code: Seleccionar todo

01 Dec 2010

Lo que he hecho en Perl ha sido lo siguiente:

$date =~ s/-/ /g;
$date =~ s/JAN/Jan/;
$date =~ s/FEB/Feb/;
$date =~ s/MAR/Mar/;
$date =~ s/APR/Apr/;
$date =~ s/MAY/May/;
$date =~ s/JUN/Jun/;
$date =~ s/JUL/Jul/;
$date =~ s/AUG/Aug/;
$date =~ s/SEP/Sep/;
$date =~ s/OCT/Oct/;
$date =~ s/NOV/Nov/;
$date =~ s/DEC/Dec/;

Supongo que tiene ...

Muy buena.

Estoy intentando pasar un numero de hexadecimal a decimal.

Estuve usando la función "hex", pero qué sorpresa cuando me dí cuenta que esto hace todo lo contrario, de decimal a hexadecimal.

Leí en el foro printf("%x", Valor), pero lo que necesito es guardar esto en una variable.

¿¿ Alguien sabe alguna ??

Hola a todos.

¿Se puede trozear un string por saltos de línea?

Lo que quiero hacer es mostrar la salida del comando "df" desde un webmin.

Gracias a todos.