Community  »  Perl: Allgemeines Forum

Einzelnes Zeichen in $test einfügen	Seitenanfang
Hi. Ich habe verwende z.B.: $test = 'Hallo'; nun möchte ich vor das "H" noch ein Zeichen einfügen. Das das danach z.B. so aussieht: print "$test"; // "xHallo" - Ausgabe Datum: 05.01.2006-22:45
re: Einzelnes Zeichen in $test einfügen	Seitenanfang
Hallo Stefan, Ein Weg ist: $test = 'x' . $test; Der Punkt verbindet zwei Strings. Gruß, Michael Datum: 05.01.2006-23:40
re: Einzelnes Zeichen in $test einfügen	Seitenanfang
Danke für die Antwort. mfg Stefan Datum: 06.01.2006-10:09
re: Einzelnes Zeichen in $test einfügen	Seitenanfang
my $string = 'Hallo'; # [1] Verkettung durch Punkt-Operator $string = 'Text' . $string; # [2] ... durch join() $string = join('', 'Text', $string); # [3] ... durch String-Interpolation $string = "Text$string"; # [4] ... durch substr() als lvalue substr($string, 0, 0) = 'Text'; # [5] ... durch Substitution (RegExp) $string =~ s/^/Text/; print "$string\n"; Wobei Variante [1] und [2] der Lesbarkeit halber zu bevorzugen sind. Was die Geschwindigkeit betrifft liegen [3] und [2], gefolgt von [1] vorne (was man aber vernachlaessigen kann). Ein wenig mehr als das Doppelte der Zeit braucht [4] und das Dreifache [5]. Datum: 06.01.2006-11:16