use POSIX qw[ _exit ]; $Fenster_Fehler_Hilfe -> Button( -text => ' Ende ' , -width => 33 , -height => 2 , -command => sub{ $Fenster_Fehler_Hilfe -> destroy; POSIX::_exit( 0 ); } ) -> place( -x => 287 , -y => 485 );