[Ruhr-pm] Perl

[Veit Wahlich]

Am Donnerstag, den 10.09.2009, 16:28 +0200 schrieb Renee Bäcker:
> Ich würde da eher qx{} nehmen:
> 
> my ($line) = qx{ programm.exe 'param1' 'param2' };
> my $info   = (split /\s/, $line)[2];
> 
> print $info;

Okay, qx{} oder `` ist natuerlich einfacher und viel kuerzer. Ich hatte
das zunaechst ausgeschlossen, weil dabei ja noch eine Shell gestartet
wird -- aber bei einem solchen Aufruf von open() passiert das ja
genauso.

Er moechte allerdings die erste Zahl aus der Ausgabe, nicht die dritte,
also (split /\s/, $line)[0]; oder ($info) = ($line =~ /^(\S+)/);

Die () im Regex hatte ich uebrigens vorhin vergessen, dort gehoeren sie
ja auch hin.

Gruesze,
// Veit