2010-11-03T16:43:08 Rolf_PlusW

Und: Der Code läuft ja in >99% der Fälle ohne dass eine Fehlermeldung kommt, er ist ja nicht prinzipiell falsch, sondern - meine Vermutung - es gibt Fälle, in den in dem geparsten Array etwas nicht stimmt, was dann zu dem Fehler führt. Nur ich habe keine Idee, was da schief geht, d.h ich habe auch keinen Testfall, der diesen Fehler erzeugt !

1
2
3
4
5

my @checked = map { 
    print ref($_) ? Dumper($_) : $_ ;
    $_->{class} ne 'DT' ? 1 :
             ( defined($_->{mid}) && grep ( /\w+/ , @{$_->{texts}}||() ) ? 1 : 0 )
    } @pages;