Servus!

Umgebung: Perl 5.8.8, DBI 1.5.9, MySQL 5

Eine unserer Apps zeigt ein sehr seltsames Verhalten. Per DBI werden aus
einer MySQL DB (ca 700 MB) Daten ausgelesen und gemangled (nachdem auf
die DB nicht mehr zugegriffen wird).

Das Problem tritt bei eben diesem mangling auf, genauer bei 3 ineinander
verschachtelten maps. Bei der normalen ausführung werden diese auch nach
15 Minuten nicht beendet. Wenn man allerdings in die äusserste map ein
print auf STDERR einfügt wird das Script innerhalb von 5 min. fertig.

Ist so etwas schon mal jemandem passiert? Wenn ja, gibt es einen
Workaround? Würde es Sinn machen, die maps durch foreach zu ersetzen?

MfG
/peter

* Peter Ludikovsky wrote in de.comp.lang.perl.misc:

Mit demselben Ergebnis? An sich klingt das so als würde das "print" den
Rückgabewert verändern, und zwar so, dass das ganze schneller beendet
wird. Du müsstest dann das print so einfügen, dass der Rückgabewert
gleichbleibt. Ggf. hilft es eines der Profiler Module zu benutzen um zu
sehen, was genau passiert.

Bjoern Hoehrmann wrote:

Ja, gleiches Ergebnis. Statt dem print hilft interessanter weise auch
ein einfaches defined $_

Peter Ludikovsky wrote:

Hoffentlich habt ihr sehr viel Hauptspeicher. Perl verbrutzelt
vermutlich ein Vielfaches der 700 MB.

Klingt obskur. Kommt das gleiche Ergebnis raus?
Was darf man sich unter diesen drei verschachtelten map konkret
vorstellen? Bin noch nie auf die Idee gekommen, map zu schachteln.