Article View: es.comp.os.linux.programacion
Article #1281Re: Perl y depuración
From: David Serrano (Hue-Bond)
Date: Thu, 02 Feb 2006 06:57
Date: Thu, 02 Feb 2006 06:57
47 lines
2912 bytes
2912 bytes
AnimAlf, mié20060201@22:17:25(CET): > > 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. Ugh. 5.5 ya tiene tiempo... > utilizo los switches -T y -w > #/usr/bin/perl -Tw Como ya te han dicho, 'use warnings' es mejor que '-w'; > ¿puedo hacer algo con mi perl para que sea más esctricto? Por supuesto, 'use strict'. De todas formas, esa no es la solución a tu problema en este caso. El problema es que la sintaxis del operador mkdir cambió entre una versión y otra (o eso parece). Creo que no te queda otro remedio que empollarte los perldelta* relevantes y enterarte de lo que es distinto. Seguro que perlport también te da consejos interesantes. Otra cosa que debes hacer siempre siempre siempre, es comprobar el valor de retorno de las llamadas al sistema. En este caso era un error de compilación así que tampoco te serviría pero, ¿qué pasaría si el mkdir se ejecutara bien en ambos sitios y luego fallase un posterior open? mkdir 'dir', 0750 or die "mkdir: $!"; open my $fd, '>', 'dir/file' or die "open: $!"; > debo quizás recompilarlo con alguna opción especial para poder tener los > errores de este tipo localmente. Si quieres ver los errores en el navegata, me temo que debes redirigir stderr a stdout en el momento en que se llama al script. Quizá también se puede hacer desde el propio programa, dentro de un bloque BEGIN, pero ahora mismo me tengo que marchar a la ofi pitando y no me acuerdo exactamente de lo que hay que poner en el segundo parámetro de open. -- David Serrano
Technical Details
Message-ID:
<slrndu3bb8.mqq.responder_solo_en_el_grupo@genus.hue-bond.info>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news4.google.com!news.glorb.com!news.antakira.com!antonio.escomposlinux.org!cernicalo.escomposlinux.org!escomposlinux.org!not-for-mailReferences:
<1138828645.236176.139620@g49g2000cwa.googlegroups.com>Show Full Headers
Complete Article Headers
X-Google-Thread: f86c8,1a9245151043c239 X-Google-Attributes: gidf86c8,public X-Google-Language: SPANISH,UTF8 Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news4.google.com!news.glorb.com!news.antakira.com!antonio.escomposlinux.org!cernicalo.escomposlinux.org!escomposlinux.org!not-for-mail From: "David Serrano (Hue-Bond)" <responder_solo_en_el_grupo@yahoo.es> Newsgroups: es.comp.os.linux.programacion Subject: Re: Perl y depuración Date: Thu, 2 Feb 2006 06:57:44 +0000 (UTC) Organization: I work for myself Lines: 47 Message-ID: <slrndu3bb8.mqq.responder_solo_en_el_grupo@genus.hue-bond.info> References: <1138828645.236176.139620@g49g2000cwa.googlegroups.com> NNTP-Posting-Host: 127.red-83-32-93.dynamicip.rima-tde.net Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-Trace: cormoran.emeteo.local 1138863464 26834 83.32.93.127 (2 Feb 2006 06:57:44 GMT) X-Complaints-To: emeteo@escomposlinux.org NNTP-Posting-Date: Thu, 2 Feb 2006 06:57:44 +0000 (UTC) X-Message-Flag: Visit http://www.debian.org/ X-MSMail-Priority: High Mail-Copies-To: nobody User-Agent: slrn/0.9.8.1pl1 (Debian)