perl apuja

Yleiset ongelmat, ohjelmien kääntäminen, kernel, lirc jne.
Avatar
robin
Yli-ihminen
Viestit: 501
Liittynyt: 09.09.2003 3:00

perl apuja

Viesti Kirjoittaja robin » 26.10.2004 13:44

Joduimpa taas istahtamaan perlin ääreen, mitempa toimia seuraavassa

$blaa = "cn=tamatieto,ou=tadaa,ou=abc,o=tadaa"

@zennimi_ud = split(/,ou=.+/,$blaa);

print "@zennimi_ud\n";

Tulostaapi cn=tamatieto

Mutta kun haluaisin leikata myös nuo cn= merkit pois eli tulosteen pitäisi olla pelkästään tamatieto

Avatar
cue
Yli-ihminen
Viestit: 688
Liittynyt: 09.09.2003 3:00
Paikkakunta: JKL
Viesti:

Viesti Kirjoittaja cue » 26.10.2004 14:32

Koodi: Valitse kaikki

#!/usr/bin/perl

$_="cn=tamatieto,ou=tadaa,ou=abc,o=tadaa";s/cn=//;s/,.+//;

print;
Tulostaa "tamatieto".

Avatar
robin
Yli-ihminen
Viestit: 501
Liittynyt: 09.09.2003 3:00

Viesti Kirjoittaja robin » 26.10.2004 14:46

Kiitän!

Vastaa Viestiin