🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #11343

[Perl] Problemas con "Illegal division by zero..." en innreport

#11343
From: Antonio
Date: Mon, 10 Dec 2001 21:15
56 lines
2685 bytes
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Buenas.

Yo sol�a ejecutar un script llamando innreport que viene con el paquete
inn2 para generar unas bonitas estad�sticas en html.

El susodicho es un script de perl y, tras mucho romperme la cabeza
tratando de bucear en un galimat�as que no entiendo, he decidido publicar
el error a ver qu� pasa.

El mensaje de error que me da (y antes no) es:

Illegal division by zero at /usr/lib/news/bin/innreport line 1412


Y, claro, all� voy yo disparado a ver la l�nea 1412 del innreport, donde
encuentro esto:


  foreach $key (sort keys %$dates) {
  $x_min = $key if $x_min > $key;
  $x_max = $$dates{$key} if $x_max < $$dates{$key};
  my $t = $$out{$key} / ($$dates{$key} - $key);    # <-- l�nea 1412
  $y_max_out = $t if $y_max_out < $t;
  $t = $$in{$key} / ($$dates{$key} - $key);
  $y_max_in = $t if $y_max_in < $t;
  }
			    
Supongo que el no tener el resto del archivo os va a despistar bastante,
pero es que el archivo es muy grande y no sab�a cuanto poner
exactamente ;-)


A ver si alguien por ah� entiende de perl y usa inn2 ;-)

P.D Mi versi�n de perl es la 5.6.1-6. Deduzco que es un problema con  
este programilla porque todo empez� al hacer un upgrade a una versi�n 
nueva. S�, ya s� que es evidente, pero de ah� no paso ;-)

- -- 
Un saludo.

Antonio <antonio@escomposlinux.org>
Clave p�blica gnupg en pgp.rediris.es
Usuario Linux registrado n� 189536

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: For info see http://www.gnupg.org

iD8DBQE8FSXx2t+2vrJ8PLURAvItAJ9uJhCF2rjFwYQNTReHNdOax94XMACfRusf
KobQtez3KkRTL6U99UNBJgo=
=Cgv/
-----END PGP SIGNATURE-----
Technical Details
Message-ID: <9v38lh$4m0$1@antonio.escomposlinux.net>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fu-berlin.de!uni-berlin.de!213.98.91.117!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: f86c8,a56e5d4cae5a4856,start
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2001-12-10 13:20:39 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fu-berlin.de!uni-berlin.de!213.98.91.117!not-for-mail
From: Antonio <antonio@escomposlinux.org>
Newsgroups: es.comp.os.linux.programacion
Subject: [Perl] Problemas con "Illegal division by zero..." en innreport
Date: Mon, 10 Dec 2001 21:15:29 +0000 (UTC)
Organization: Mi casita
Lines: 56
Message-ID: <9v38lh$4m0$1@antonio.escomposlinux.net>
NNTP-Posting-Host: 213.98.91.117
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: fu-berlin.de 1008019237 13410978 213.98.91.117 (16 [63420])
X-Orig-Path: julieta.escomposlinux.net!antonio.escomposlinux.net!not-for-mail
User-Agent: slrn/0.9.7.3 (Linux)