[quote=jan,27.09.2003, 22:38]leute, rtfm!
ich mein, für einen blutigen anfänger finde ich es ja verständlich aber bei ein bisschen erfahrung sollte man doch mal lernen, die docs zu benutzen.

http://www.perldoc.com/perl5.8.0/pod/func/system.html

[/quote]

Quote

Code: (dl )

1
2
3
4

if(system('dira') != 0)
{
	print "error while executing command: $!\n";
}

das funktioniert so nicht.

Der system-Befehl liefert den exit-Code zurück.

Wenn du ein Programm "dira" hast, welches z.B. mit exit(1) beendet wird, dann gibt dir der system-Befehl die 1 (oder 256) zurück. ;)

Zum Prüfen eines Befehls würde ich (unter UNIX) den which-Befehl vorschlagen. Wobei die Ausgabe sicherlich vom Betriebssystem abhängt, und interne Befehle oder aliasse wohl nicht gefunden werden. Wenn der which-Befehl eine Programm liefert, dann kannst du ja mit -x noch nachprüfen, ob es ausführbar ist.