Foro - Perl en Español

El error indica que el usuario que ejecuta el servidor web no tiene permisos para entrar en ese directorio. Bueno, en ese y en todos de los que depende.

Lo normal es que el servidor web sea ejecutado por el usuario www-data o httpd o algo parecido. Si haces un ps aux lo verás.

Entonces, tienes, básicamente, dos opciones.

1.- La peor solución, pero la más rápida, dar permisos 755 a todos los subdirectorios que llegan a perl_mods. Es decir, cambiar los permisos de

/home
/home/Ainhoa
/home/Ainhoa/perlmvccgiapp
/home/Ainhoa/perlmvccgiapp/app1_private
/home/Ainhoa/perlmvccgiapp/app1_private/perl_mods

Es mala solución, porque el resto de usuarios también podrán entrar en esos subdirectorios.

2.- La otra opción es mejor: consiste en cambiar la propiedad del grupo de las carpetas al mismo grupo al que pertenece el usuario que ejecuta el servidor web. Si, por ejemplo, ese usuario pertenece al grupo www-data, cambiaremos los subdirectorios a ese grupo y les daremos los permisos 750. Así, él podrá entrar pero no el resto de usuarios.

Naturalmente, esto no tiene por qué hacerse en todos los subdirectorios. Por ejemplo, en el /home y en el /Ainhoa, con permisos 755 ya sería suficiente.

La cuestión es que el usuario www-data pueda entrar a través de todos ellos.

Es un programa para instalar módulos en un determinado directorio.

Las instrucciones dicen:
- usa perldigger.pl para localizar dónde está perl, tar, gzip, mysql, HOME, etc. Entonces, ajusta las variables $APP_PRIVATE_DIR y $TAR (y la primera línea de este script, si es necesario).

- sube por ftp los módulos Perl, por ejemplo, <módulo>.tar.gz, a $FTP_CPAN_MODULES_DIR, y luego ejecuta este programa

- En los programas Perl que usen estos módulos, añade

use lib qw($LOCAL_PERL_DIR/lib/perl5/5.8.8 $LOCAL_PERL_DIR/lib/perl5/site_perl/5.8.8 $LOCAL_PERL_DIR/lib/perl5/site_perl)


Bueno, se trata de un modo, un poco complejo, de subir e instalar módulos a un servidor de Internet en el cual no tengamos otras facilidades para instalar módulos Perl, o no tengamos un acceso completo al servidor. Cosa muy distinta a hacerlo en nuestra propia máquina, donde instalar los módulos es algo trivial, con la ayuda del comando cpan.

En cuanto al programa, primero intentará hacer un

chdir $FTP_CPAN_MODULES_DIR

$FTP_CPAN_MODULES_DIR vale "/app1_private/perl_mods". Es decir, es una ruta absoluta (comienza por '/', por lo que cuelga directamente del directorio raíz del sistema). Y aquí veo el primer problema, porque está en contradicción con un mensaje anterior, donde decías que la ruta es /home/Ainhoa/perlmvccgiapp/app1_private. ¿En qué quedamos? ¿Cuál es la correcta? En cualquier caso, si el directorio no existe y/o no puede entrar, morirá en el die().

Si, luego, opendir() falla, es que, quizás, el programa sí que ha conseguido entrar en el directorio , pero no ha podido leer el listado de ficheros que hay dentro. Tendrás que revisar los permisos de lectura y ejecución del directorio.

El error dice que el módulo base no ha podido localizar el módulo BaseCgiApp.pm.

Hay un problema con los use lib, que no están reflejando de forma correcta la ruta hacia los directorios donde se debería encontrar.

Una de dos... o me aseguro que ese fichero está donde debería estar, o cambiaría la línea 5 por una ruta absoluta (no fiarme de una ruta relativa).

Tienes un error en el primer código.

En la primera línea pones

$PRIVATE_HOME_DIR = '/app1_private';

y en la tercera pones

use lib $PRIVATE_HOME_DIR.'/app1_private/modules';

Es decir, que estás incorporando, con use lib, el directorio '/app1_private/app1_private/modules'.

No creo que eso esté bien. Ni el valor de $PRIVATE_HOME_DIR ni el valor que le pasas a use lib.

Con

use lib $PRIVATE_HOME_DIR.'/lib/perl5/site_perl';

estamos indicando a Perl que si necesita buscar un módulo, que pruebe a mirar en $PRIVATE_HOME_DIR . '/lib/perl5/site_perl', es decir, en tú directorio privado. La ruta /lib/perl5/site_perl es típica de la instalación de los módulos del sistema, pero como has hecho una instalación "doméstica", los módulos se encontrarán en el directorio donde los instalaste ($PRIVATE_HOME_DIR).

Y fíjate en el mensaje de error: Perl te da una lista de todos los directorios en los que busca a los módulos que va a necesitar. Esa lista es la que modificamos dentro de nuestros programas con el use lib. Si Perl no encuentra MyMain.pm es que no está en ninguno de esos directorios. Apuesto a que el incorrecto es /app1_private/app1_private/modules.

Por favor, repasa lo que significa ruta absoluta y relativa; y la importancia de que una ruta empiece por '/' o no.

Y en Perl, debes entender lo que hace el operador '.' (concatenación).

El error dice que el comando tar no tiene permisos para crear directorios (mkdir).

El error estará en el valor de $FTP_CPAN_MODULES_DIR, según la línea 51 del primer código que publicaste.

Podría darse el caso de que no te deja crear el directorio porque ya está creado antes, de los intentos anteriores.