wie kann ich in perl shell befehle ausführen, wie z.B useradd ?? SUSE 6.1 gruss markus --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Hi, On Thu, Dec 30, 1999 at 20:19 +0100, markus monka wrote:
wie kann ich in perl shell befehle ausführen, wie z.B useradd ??
Falls der Output der Befehle nicht interessiert, system('useradd'), falls der Output gebraucht wird, `useradd`. Ciao, Stefan --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
On Thu Dec 30 1999, markus monka wrote:
wie kann ich in perl shell befehle ausführen, wie
perl -e 'system("befehl");' -- Heinz. --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
wie kann ich in perl shell befehle ausführen, wie z.B useradd ??
SUSE 6.1 (Die Suse-Version ist vollkommen irrelevant)
Methode 1: $ausgabe := `useradd` (Akzent-Zeichen, nicht Hochkomma!) bzw. `useradd` useradd wird ausgeführt, das ausgegebene Ergebnis wird in der wahlweise angegebenen Variable gespeichert. Methode 2: system('dateiname parameter'); # aufrufen einer Shell (z.B. bash) und ausführen (hier wieder Hochkomma!) system('dateiname', 'parameter'); # direktes Ausführen der Datei ohne Shell. Methode 3: open (PRG, "|/pfad/dateiname") || or die "Kann nicht ausgeführt werden!"; print PRG $string; #irgendwas als Eingabe an das Programm schicken close PRG; bzw. open (PRG, "/pfad/dateiname|"); $string = <PRG>; #ein Ausgabezeile lesen close PRG; Kombination der obigen Möglichkeiten müsste möglich sein, hab ich noch nicht probiert. Als Lektüre empfehle ich vom O'Reilly-Verlag "Programming Perl" und das "Perl Cookbook" (Wenn du des Englischen mächtig bist erspar' dir die deutschen Versionen.) Evt. hilft dir auch "Learning Perl" (selber Verlag) -- Marco --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
participants (4)
-
hd@elfie.rhein-neckar.de
-
linux@jwr.de
-
monka@gmx.de
-
sttr@sttr.de