Funktionen auf Strings

© Michael Kalinka, 2001

---

chomp(string)

chomp($str) : entfernt Zeilenendezeichen ( "\n" )
Beispiel : chomp($str = "geheim\n") => $str = "geheim"

length(string)

$anz = length($str) : liefert die Länge des Strings
Beispiel : $str = "arbeiten"; $anz = length($str) => $anz = 8

index(string,substring,offset)

$pos = index($str1,$str2,$off) : liefert Position von $str2 in $str1 ab $ind
$str1 = "Bananas"; $str2 = "na"; $off = 3;
Beispiel 1 : $pos = index($str1,$str2); => $pos = 2
Beispiel 2 : $pos = index($str1,$str2,$off); => $pos = 4
index liefert -1, wenn $str2 nicht in $str1 enthalten ist

substr(string,offset,length)

$teil = substr($str,$off,$len) liefert Teilstring von $str der Länge $len ab Position $off
substr($str,$off,$len) = $ins_str verändert $str ab Position $off um $len Zeichen
$str = "Schiff"
Beispiel 1 : $teil = substr($str,4) => $teil = "Schi"
Beispiel 2 : $teil = substr($str,2,3) => $teil = "hif"
Beispiel 3 : substr($str,3,0) = "l" => $str = "Schliff" , $len = 0 : einfügen
Beispiel 3a : substr($str,3) = "l" => $str = "Schl" , ab $off=3 alles ersetzen
Beispiel 4 : substr($str,3,1) = "l" => $str = "Schlff"
Beispiel 5 : substr($str,3,2) = "l" => $str = "Schlf"
Beispiel 6 : substr($str,3,3) = "l" => $str = "Schl"

lc , lcfirst    uc , ucfirst

lc : lower case, Kleinschreibung	uc : upper case, Großschreibung
$str = lc("HALLO"); => $str = "hallo"	$str = uc("hallo"); => $str = "HALLO"
$str = lcfirst(WILLY); => $str = "wILLY"	$str = ucfirst("willy"); => $str = "Willy"

eval "string"

eval $str : $str enthält gültigen Perlcode.
eval ruft den Perlinterpreter mit diesem Code auf.
Damit ist es möglich, Perlcode zur Laufzeit zu erzeugen und auszuführen.
Beispiel :
$op = "**";
$rec = eval "3 $op 2";
=> $rec = 9