Opened by Graf Herschel at 2018-12-11 10:42
Vielen Dank für deine Hilfe!
>> dass es stark davon abhängt, was Du für Daten hast
Natürlich, leider ist Inhalt und Länge nicht abschätzbar.
Ich habe es mit rindex() und substr() probiert.
Gefällt mir gut, reverse() will ich nicht.
Dann habe ich noch eine andere Methode konstruiert:
Kein Test ob character gefunden oder ob pos im Bereich.
Es fühlt sich performant an, bin mir aber nicht wirklich sicher.
Was meinst du dazu?
Gruß
Graf Herschel
Last edited: 2018-12-11 14:32:14 +0100 (CET)
>> dass es stark davon abhängt, was Du für Daten hast
Natürlich, leider ist Inhalt und Länge nicht abschätzbar.
Ich habe es mit rindex() und substr() probiert.
Gefällt mir gut, reverse() will ich nicht.
Dann habe ich noch eine andere Methode konstruiert:
Code: (dl
)
1
2
3
4
5
6
7
my $line="abcdefABCDEF";
my $subs='K';
$line =~ /([^CBf]*)$/;
my $pos = $-[0] - 1;
$line =~ s/(?<=.{$pos})(.)/\u$subs/;
print("POS: [$pos] $line\n");
Kein Test ob character gefunden oder ob pos im Bereich.
Es fühlt sich performant an, bin mir aber nicht wirklich sicher.
Was meinst du dazu?
Gruß
Graf Herschel
Last edited: 2018-12-11 14:32:14 +0100 (CET)