In Perl-Script pipen: Ausgabe UNIXcmd in ein Perl-Script pipen (Allgemeines zu Perl)

[thread]7178[/thread]

In Perl-Script pipen: Ausgabe UNIXcmd in ein Perl-Script pipen

Gast Gast

2005-08-01 13:36

Ich möchte die Ausgabe eines UNIX-Kommandos mit pipes in einem Perl-Skript weiterverarbeiten. Z.B.
ls -l | bearbeiten.pl

Wie komme ich am besten an die Ausgabe des UNIX-Befehls

Crian

2005-08-01 13:39

User since
2003-08-04
5873 Artikel
ModeratorIn

Code: (dl )

while (<>) {
    chomp;
    # verarbeite $_
}

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

2005-08-01 14:27

User since
2003-08-04
12208 Artikel
Admin1

und wozu der kalendereintrag? ich schmeiß den raus, wenn kein einspruch kommt

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

esskar

2005-08-01 14:29

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

[quote=pq,01.08.2005, 12:27]und wozu der kalendereintrag? ich schmeiß den raus, wenn kein einspruch kommt[/quote]
go for it!

Crian

2005-08-01 15:07

User since
2003-08-04
5873 Artikel
ModeratorIn

Ja weg damit, hatte mich auch schon gewundert.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View all threads created 2005-08-01 13:36.