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
perl apuja
Koodi: Valitse kaikki
#!/usr/bin/perl
$_="cn=tamatieto,ou=tadaa,ou=abc,o=tadaa";s/cn=//;s/,.+//;
print;