Foro - Perl en Español

Estimados ayuda, tengo un script el cual lee desde un webservice e inserta en una base de datos en MySQL. Después de un tiempo determinado de correr correctamente me arroja lo siguiente:

Modification of a read-only value attempted at CapturaDatos.pl

¿Qué significa el error?

Gracias.

Lo que pasa es que estoy haciendo un script en Perl que descomprime
un zip que contiene un directorio y ese directorio tiene que reemplazar al que
existe. Ejemplo:

Si comprimo la carpeta de Desktop en /home/pablo/respaldos tengo que descomprimir
el zip que contiene Desktop en /home/pablo (porque ahí está el directorio Desktop).

Entonces, lo que quiero es saber son dos cosas:

- cómo puedo saber la ruta absoluta a partir del nombre del directorio ...

Hola. Escribo aquí porque llevo días tratando de hacer una expresión regular que me permita sacar una fecha que está en un nombre de archivo. Por ejemplo:

Desktop 11-10-2012.zip

Quiero que en una variable solo me quede "11-10-2012".

Ojalá puedan ayudarme. Saludos :)

Chicos, recurro a ustedes nuevamente ya que tengo que hacer una tarea en la universidad y estoy algo complicado. Dejo escrito lo que tengo que hacer:

Escriba un programa en Perl que reciba dos parámetros:
- un nombre de usuario
- un pid (opcional)

El sistema debe mostrar la cantidad de memoria total que ocupan los procesos que le pertenecen al usuario.

Si es ingresando el pid, solo se debe mostrar la memoria total de ...

Hola a todos, necesito de su ayuda. Tengo un cgi en el cual quiero insertar un array de Perl a un array de JavaScript. Por adelantado les doy las gracias por la ayuda que me puedan dar.

Les dejo el código por si acaso (es un simple formulario hecho con cgi)

#!/usr/bin/perl
binmode STDOUT, ":encoding(UTF-8)";
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use lib '../Modulos/';
use buscar;

#print error;
print "Content-type: text/html;charset=UTF-8\n\n";

my $inst = buscar->new; ...

Estimados,
Los molesto para consultarles cómo puedo "emular" en Perl el siguientes comando de UNIX.

grep -e "^acceso primero" config.txt -A1

Esto me guarda la línea siguiente a lo buscado.

Estoy haciendo el siguiente script.

#!usr/bin/perl
#Radio X
#Version 0.2
#Coded By Doddy H
#
#Download : http://www.mplayerhq.hu/MPlayer/releases/win32/MPlayer-mingw32-1.0rc2.zip
#

use Cwd;

my %emisoras = (

0 => {

"nombre" => "Absolute Classic Rock (Broadband)",
"genero" => "Rock'n'Roll",
"link" => "http://network.absoluteradio.co.uk/core/audio/ogg/live.pls?service=vcbb"

},

1=> {

"nombre" => "Absolute Classic Rock (Modem)",
"genero" => "Rock'n'Roll",
"link" => "http://network.absoluteradio.co.uk/core/audio/ogg/live.pls?service=vc"

},

2=> {

"nombre"=>"Absolute Radio (Broadband)",
"genero"=>"Pop",
"link"=>"http://network.absoluteradio.co.uk/core/audio/ogg/live.pls?service=vrbb"

},

3=>{

"nombre"=>"Absolute Radio (Modem)",
"genero"=>"Pop",
"link"=>"http://network.absoluteradio.co.uk/core/audio/ogg/live.pls?service=vr"

},

4=>{

"nombre"=>"Absolute Xtreme ...

¡¡Muy buenas!! Espero que me puedan ayudar con mi problema :mrgreen:

Pues resulta que tengo un formulario que funciona como login, y al validar el acceso lo hago desde ese mismo fichero. Entonces, si es erróneo me sale el error, pero si es correcto me gustaría que me enviara a otra página.

¿¿Cómo puedo hacerlo??

Saludos y gracias de antemano ...

¡¡Hola!!

Nuevamente necesito ayuda, estoy tratando de copiar un fichero de una carpeta a otra y la verdad no sé qué estoy haciendo mal, estoy realizando la prueba con un *.txt, y también necesito pasar carpetas de una ruta a otra en Windows.

#!/usr/bin/perl


use strict;
use File::Find;
use File::Copy;

my $dir = 'C:\\Users\\pgaviri\\Desktop\\Probar.txt';
my $path = "C:\\Users\\pgaviri\\Documents";

find(\&imprimir_archivo, $dir);

sub imprimir_archivo{
my $elemento = $_;
print "$elemento\n" if -f $elemento;
}

copy("Probar.txt", $path);


Mil ...

Hola, segun voy avanzando en esto de Perl me van surgiendo dudas que os expongo.

Tengo un fichero data.csv (que anexo), que después de tratarlo con Perl, creará varios ficheros xml que luego se convertirán en gráficos.

En este csv, se recogen varios valores, digamos principales:

campo(0) : "value" valor del dato, lo que aparece en la gráfica
campo(1) : "Timestamp" tiempo Eje X (día)
campo(2) : "MetricId" Eje Y (8 valores diferentes, agrupados en ...