Foro - Perl en Español

Alguien me puede explicar qué me está indicando este error:

Code: Seleccionar todo

Name "main::find" used only once: possible typo at ./usugrupo.pl line 179.

En el siguiente código me aparece el siguiente warning en la línea que os señalo:

Code: Seleccionar todo

Warning:
Use of uninitialized value in string ne at ./usugrupo.pl line 225, <ENTRADA1> l

if(-e $F_GRUP){
open(ENTRADA1, $F_GRUP) or die "Error: no se puede abrir el fichero $!";
while($linea1 = <ENTRADA1>){
chop $linea1;
@linea1 = split /:/, $linea1;#Meto en el vector los campos de /etc/grup
#print "linea1 vale $linea1\n";
if($linea1 ne ""){#ESTA ES LA LÍNEA QUE SEÑALA EL WARNING
@names ...

Hola a todos,

tengo un cgi que al ser ejecutado desde un formulario me devuelve error. En local (Win XP) me funciona correctamente.
Al darme error pensé que puede ser porque el servidor no tiene instalados unos módulos.

He creado un directorio lib/ en el servidor y he subido los .pm de mi directorio C:/perl/site/lib/Geo, pero me sigue dando error.

¿Hay que hacer algo más aparte de subirlos al servidor?

Gracias anticipadas / saludos / ...

Agradecería si me pudiesen ayudar en lo siguiente: Estoy buscando un módulo de Perl o algún software free que me permita generar reportes e Informes en mi sitio desarrollado en Perl, volcando datos desde una base MySQL.

¡¡¡¡Muchas gracias!!!! :D

En este trocito de código nunca entra en el if():

if(-e $F_GRUP){
open(ENTRADA1, $F_GRUP) or die "Error: no se puede abrir el fichero $!";
while($linea1 = <ENTRADA1>){
@linea1 = split /:/, $linea1; # Meto en el vector los campos de /etc/grup
print "linea1 vale $linea1";
if ($linea1 eq "") {
print "EOOOO";
@names = split /,/, $linea1; # Meto en un vector los nombres de los usuarios secundarios
}
print "\n";

No sé si estoy ...

Muy buenas tardes, resulta que necesito mostrar la UID y nombre de usuario cuando me convenga a través de una condición de if(). Los valores antes del if() me los pilla bien, pero cada vez que la comprobación del if() es correcta, me salta el siguiente error:

Code: Seleccionar todo

Use of uninitialized value in concatenation (.) or string at usugrupo3.pl line 182, <ENTRADA> line 11.

Os dejo el cacho de código que da el problema a ver ...

Hola,

tengo un problema de "diseño" de un programa en Perl que no sé cómo se puede solucionar.

Tengo un script en Perl llamado "General.pl". Este script llama mediante la función system() a un segundo script Perl llamado "Secundario.pl". "General.pl" tiene que esperar a que acabe la ejecución de "Secundario.pl" para poder continuar. "Secundario.pl" tarda alrededor de una hora en ejecutarse.

El problema que tengo es que ahora necesito llamar tres veces a "Secundario.pl". Si ...

Hola, ante todo muy buenas noches. En la facultad me han planteado realizar un ejercicio bastante extenso, en la que una parte requiere el uso de split().

Resulta que al escribir en emacs:
@nombre = split /:/, $nombre;

emacs, a partir del segundo "/" me marca todo el texto como si fuese un print(), es decir, del mismo color rosado del contenido de print "este contenido";

Necesito ejecutar dicha orden de esa manera para extraer ...

Hola a todos...

Ante todo aclaro que recién estoy empezando en esto...

Mi intención es crearme un bot (en español) para mi canal en justintv para que modere en los momentos que yo no pueda estar. Si alguien me pudiera pasar un tutorial de cómo hacerlo le estaré muy agradecido.

Desde ya ¡Gracias amigos!

Ya está confirmada la agenda de actividades para la próxima Conferencia Perl Europea 2009.

¡92! ¡NOVENTA Y DOS!

Nada menos que 92 charlas, conferencias, y demostraciones han sido aprobadas para ser presentadas en la próxima reunión Perl en Europa.

Naturalmente, es imposible atender a todas ellas, porque se dan, de forma simultánea, en 4 salas, al mismo tiempo, durante 4 días.

Las salas están divididas según el interés del oyente: Corporativo, Principiante, Uso diario y ...