C:\Perl\bin\CGP02>aufg1.pl
Tk::Error: Datei kann nicht geöffnet werden at C:\Perl\bin\CGP02\aufg1.pl line 3
7.
 [\&main::action]
 Tk callback for .frame.button
 Tk:: at C:/Perl/site/lib/Tk.pm line 228
 Tk::Button::butUp at C:/Perl/site/lib/Tk/Button.pm line 111
 (command bound to event)