if ("$k" eq "$input"){
                                # Die SSID des Netzes in eine Datei schreiben
                                open (DAT,">","$datei") or die "Konnte die Datei \"$datei\" nicht öffnen!\n";
                                print DAT $input;
                                close(DAT);
                                print "Verbindung zu WLAN-Netz \"$input\" wird aufgebaut...\n";
                                print "...\n";
                                my @system=`sudo ifup eth2`;
                                print "...\n";
                                print "@system\n";
                                print "...\n";
                        }