SSH Script zur Massenabfrage: kein fehler, kein log, na supi... - #77482 (Allgemeines zu Perl)

renee

2007-06-13 16:30

User since
2003-08-04
14371 Artikel
ModeratorIn

Mit system bekommst Du nicht die Ausgabe des Programms. Dafür musst Du Backticks, qx{} oder CPAN:

IPC::Open2 nehmen...

z.B. mit Backticks

Code (perl): (dl )

my $output = `befehl`;

mit qx{}

Code (perl): (dl )

my $output = qx{befehl};

mit

IPC::Open2 (aus: http://www.unix.org.ua/orelly/perl/prog3/ch32_30.htm

Code (perl): (dl )

use IPC::Open2;

local(*HIS_OUT, *HIS_IN);  # Create local handles if needed.

$childpid = open2(*HIS_OUT, *HIS_IN, $program, @args)
    or die "can't open pipe to $program: $!";
print HIS_IN "here's your input\n";
$his_output = <HIS_IN>;
close(HIS_OUT);
close(README);
waitpid($childpid, 0);

IPC::Open2 ist schon Ewigkeiten ein CORE-Modul.

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/