🚀 go-pugleaf

hola,

estoy escribiendo unos script es perl en una máquina Linux 2.6.14.3
con
la versión 5.008007 de Perl, estos scripts luego los cuelgo en una
Solaris 5.8 con la versión de perl 5.00503 en la que accedo vía ftp.

utilizo los switches -T y -w
#/usr/bin/perl -Tw

Bien, pues casi me vuelvo loco tras el primer intento, en donde tras
comprobar que en los scripts locales no aparecía ni un sólo warning,
pero tras colgarlos en el servidor remoto, éstos no podían ser
ejecutados. Probé a cambiar -w por -W para ver si podía detectar
donde
estaba el error, pero no me mostraba advertencia ninguna. Finalmente
opté por hacer por colgar el script por pasos, primero ejecuta esto,
luego esto ... a trozos :(( para descubrir que mi error estaba en la
orden
mkdir dir;

en la que no escribía el octal de los permisos, creí que tendría que
coger por defecto el 0755 por defecto. Tras corregirlo todo funciona
bien en ambos lados.

Claro podéis imaginar, que localmente me recorrí el script con el
debug
(-d) como veiticatorcientas veces, sin localizarlo.

Y lo curioso es que si el la orden "mkdir dir;" estaba presente en el
script, la ejecución de este era impedida por el servidor, aunque
nunca
llegase el script a pasar por esa orden, por ejemplo

my $a=0; if ($a) {mkdir "dir";}
me da error a no ser que esté escrito con el segundo parámetro
my $a=0; if ($a) {mkdir "dir", 0700;}

y claro, la salida está por el navegador, con lo que mi información
sobre el error siempre es nula, si además no se inicia la ejecución.

El proyecto lo tengo en sus inicios, ahora me ha sido fácil encontrar
error, pero claro ambiciono que crezca pero me conozco y cuando me
aparecen cosas como estas me desespero dejando aparcado el proyecto.

¿puedo hacer algo con mi perl para que sea más esctricto? debo
quizás
recompilarlo con alguna opción especial para poder tener los errores
de
este tipo localmente.

thanks
--
AnimAlf AnimAlf@engendro.sytes.net
http://www.fut.es/~acl/AnimAlf
Personal Experimental WebServer: http://www.engendro.sytes.net
LiNUX ReGiSteRED UseR #91326
PublicPGPkeyID 0xB3B41215
Is the truth out there?

Coalición europea contra el correo comercial no solicitado:
http://www.euro.cauce.org/es