ja ich nutze CGI::Carp qw/fatalsToBrowser/; sowie #!/usr/bin/perl -w
gut.
Trotzdem wundere ich mich, dass das hier durchgeht:
.
my $i=0;
for (@query)
{
if (($$_{lg} != $query[$i-1]{lg}) || ($$_{bg} != $query[$i-1]{bg}))Hier willst mit $i - 1 auf das 0-1. Element zugreifen, d.h. das letzte Element.
genau...
ansonsten würde ich die Dereferenzierung so schreiben:
$_->{lg}Denn soweit ich das verstehe müßte es auch:
$query[$i-1]->{lg}heißen.
hmm, müßte es?
Struppi.
ich hab im übrigen nochmal zusätzlich use strict benutzt, was nichts geändert hat.. ich hab das ganze auch mal laufen lassen und es hat mit der fehlermeldung:
[Mon Feb 06 09:10:41 2006] [error] [client 192.168.1.1] Premature end of script headers: /usr/projekte/home/html/ghostbuster/index.pl
terminiert
zudem hab ich mal aufmalen lassen was wärend der dauer so im system cpu und speichermäßig abgeht.
ein "kästchen" entspricht etwa 6sek. - das script terminierte nach ca. 5,5minuten!
gruß, der Hilker