2010-07-09T09:28:40 jetcki

[...]
Beim ausführen bekomme ich die Fehlermeldung:

Quote

Undefined subroutine &window::Mainloop called at window.pm line 35

Was mache ich falsch?
[...]

Ganz einfach, Du rufst die nicht existente Subroutine window::Mainloop auf ;-)

Wahrscheinlich hilft es, wenn Du den Tippfehler in Zeile 35 des Codes des Paketes window entfernst und statt Mainloop dort MainLoop hinschreibst, damit Perl auf die gewünschte importierte Subroutine aus dem Paket Tk zugreift.