Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
 |
|< 1 2 >| |  |
12 Einträge, 2 Seiten |
1
2
3
4
5
6
7
8
9
10
11
12
Schrift
use strict; use warnings;
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
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";
}1
2
3
4
1.WLAN-Netz: WLAN01
Mit welchem der oberen WLAN-Netze soll eine Verbindung aufgebaut werden?
Bitte das gewünschte WLAN-Netz eingeben: WLAN01
Verbindung zu WLAN-Netz "WLAN01" wird aufgebaut...
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif){kind=avatar}
Error-Indicatorssystem().\n\n
QuoteHm, ich denke, ausgefuehrt wird der Befehl immer. Aber manchmal klappt das mit dem Netzaufbau halt nicht. Hast schon mal in den Logs nachgesehen?
Quote# $CHILD_ERROR
# $?
The status returned by the last pipe close, backtick (`` ) command, successful call to wait() or waitpid(), or from the system() operator. This is just the 16-bit status word returned by the wait() system call (or else is made up to look like it). Thus, the exit value of the subprocess is really ($?>> 8 ), and $? & 127 gives which signal, if any, the process died from, and $? & 128 reports whether there was a core dump. (Mnemonic: similar to sh and ksh.)
Additionally, if the h_errno variable is supported in C, its value is returned via $? if any gethost*() function fails.
If you have installed a signal handler for SIGCHLD , the value of $? will usually be wrong outside that handler.
Inside an END subroutine $? contains the value that is going to be given to exit(). You can modify $? in an END subroutine to change the exit status of your program. For example:
END {
$? = 1 if $? == 255; # die would make it 255
}
Under VMS, the pragma use vmsish 'status' makes $? reflect the actual VMS exit status, instead of the default emulation of POSIX status; see "$?" in perlvms for details.
Also see "Error Indicators"
1
2
3
4
5
6
# ./skript.pl
1.WLAN-Netz: WLAN01
Mit welchem der oberen WLAN-Netze soll eine Verbindung aufgebaut werden?
Bitte das gewünschte WLAN-Netz eingeben: WLAN01
Verbindung zu WLAN-Netz "WLAN01" wird aufgebaut...
system /usr/bin/sudo /sbin/ifup eth2 failed: 13 at /<Pfad>/skript.pl line 93, <STDIN> line 1.
1
2
3
4
5
6
7
8
9
10
11
12
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";
#my @system=`/usr/bin/sudo /sbin/ifup eth2`;
#print join("--", @system)."\n";
my @args=("/usr/bin/sudo /sbin/ifup eth2");
system(@args) == 0
or die "system @args failed: $?";
}
|
|< 1 2 >| | |
12 Einträge, 2 Seiten |
![[Powered by Battie]](/battie/img/powered.png)
