Thread UNIX-Kommando in Perl-Skript verwenden (2 answers)
Opened by Duff at 2007-01-15 13:45

renee
 2007-01-15 14:00
#73208 #73208
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Mit system bekommst Du keine Ausgaben...

Und wenn Du awk-Variablen verwendest, musst Du das $ escapen, also:
Code: (dl )
@pids=system("/usr/bin/grep 'Fehler' logfile | /usr/bin/awk -F \"[.|:]\" '{print \$4}' | /usr/bin/sort -u");


Da Du aber die Ausgabe haben willst, solltest Du
Code: (dl )
@pids=qx{/usr/bin/grep 'Fehler' logfile | /usr/bin/awk -F \"[.|:]\" '{print \$4}' | /usr/bin/sort -u};
probieren...
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/

View full thread UNIX-Kommando in Perl-Skript verwenden