Fehlermeldung bei printf - #73927 (Allgemeines zu Perl)

Duff

2007-02-01 15:42

User since
2006-10-06
283 Artikel
BenutzerIn

user image

Ja danke.

Habe den Fehler aber glaube ich gefunden.
In der Zeile

Code: (dl )

printf("%-s\n",'-'x(23+length($arrayRef->[1]->[9])));           # die Laenge des Wertes im Array herausfinden

greife ich ja auf das 2te Element und nicht auf das 1te Element.
Habe dies dann so korrigiert:

Code: (dl )

printf("%-s\n",'-'x(23+length($arrayRef->[0]->[9])));           # die Laenge des Wertes im Array herausfinden

Des Weiteren rufe ich die Funktion nur auf, wenn folgende Prüfung wahr ist:

Code: (dl )

function($arrayRef) if($#{$arrayRef} >= 0)

D'OH
Daniel