vor der verwendung von ®index empfiehlt sich aber nochmal perldoc -f index ... denn bei index steht der rueckgabewert 0 nicht fuer nicht gefunden...