Perls split-funktion splitter en $string op i en @array med et valgfrit symbol som adskillertegn (delimeter). Hvis du fx vil bruge kolon ‘:’ som delimeter gør du:
@array = split(':', $string);
Men hvad gør man hvis man hvis man vil bruge flere forskellige symboler til at splitte en streng? Her er en meget enkel og overskuelig metode.
Du starter med at substituere alle de symboler du vil bruge som delimeter. Hvis du fx gerne vil bruge alle vokaler som delimeter, gør du således:
$string =~ s/(a|e|i|o|u|y|æ|ø|å)/a/g;
Nu er alle vokaler erstattet med a, og så behøver du bare at splitte med a som delimeter:
@array = split('a', $string);