In Zeile 1 referenzierst Du eine named-sub "testsub". Die gibt es in Deinem Code aber nicht. Dafür müsste in Zeile 11 sub testsub {...} stehen.

Dann der Auslöser der Fehlermeldung: was erwartest Du von testoben::$aufruf? Was soll das sein?

Wenn ich es richtig interpretiere, beginnt testoben:: einen hierarchischen Namen der hinter dem :: fortgesetzt werden muss, z.B. mit einem Funktionsnamen aus dem package testoben. (a) darf der Namen (bzw. seine Fortsetzung) kein '$' enthalten und (b) ist in diesem Package noch nichts definiert, es gibt also keine mögliche, gültige Fortsetzung.


Willst Du der Funktion in $aufruf das Package / den Klassenamen "testoben" als ersten Parameter übergeben? Dann musst Du das wahrscheinlich so machen: $aufruf->(testoben,'a')