perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 35
Click for quality!




10.02.2012 / 20:32

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragWhile Schleife
Seitenanfang
ich hab folgendes problem:

der befehl lslv -m hd10opt gibt aus:
LP PP1 PV1 PP2 PV2
0001 0166 hdisk1 0166 hdisk0

als shell skript würde es so aussehen:

lslv -m hd10opt|while read a b c d e
do
echo $d # wenn man z.b. den inhalt von $d will
done

wie lässt sich sowas in perl mit einer while schleife realisieren?

danke shconmal vorab

Datum: 18.01.2005-15:25

Beitragre: While Schleife
Seitenanfang
Sowas?
[code]@lslv = `lslv -m hd10opt`;
while (($v, $w, $x, $y, $z) = split / +/, shift @lslv) {
print $y;
}[code]
Aber warum unbedingt eine while? So waere einfacher und uebersichtlicher:
[code]@lslv = `lslv -m hd10opt`;
for (@lslv) {
$wert = (split(/ +/))[4];
print $wert;
}

Datum: 18.01.2005-17:53

BeitragUps...
Seitenanfang
OK, nochmal:

@lslv = `lslv -m hd10opt`;
while (($v, $w, $x, $y, $z) = split / +/, shift @lslv) {
print $y;
}

Aber warum unbedingt eine while? So waere einfacher und uebersichtlicher:
@lslv = `lslv -m hd10opt`;
for (@lslv) {
$wert = (split(/ +/))[4];
print $wert;
}

Datum: 18.01.2005-17:53

-






-
-