perl apuja

[robin]

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

[cue]

Koodi: Valitse kaikki

#!/usr/bin/perl

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

print;

Tulostaa "tamatieto".

[robin]

Kiitän!