Thread Ersetzen Character ab definierten Positionen innerhalb eines Strings ( Single/Double Quotes) (2 answers)
Opened by bora99 at 2021-03-24 20:47

styx-cc
 2021-03-25 00:00
#193181 #193181
User since
2006-05-20
533 Artikel
BenutzerIn

user image
Das lässt sich sehr viel einfacher mit Lookahead und Lookbehind in Kombination lösen:


Code (perl): (dl )
1
2
3
4
5
6
7
8

#!/usr/bin/perl
use strict;
use warnings;

$_ = "\"VAL\", \"VAL\"";
print $_.$/;
s/(?<!\A)("|')(?!\Z)//g;
print $_.$/;


(?<!\A) <-- Look-Behind guckt ob vor " oder ' kein Stringanfang steht (\A)
("|')
(?!\Z) <-- Look-Ahead guckt ob nach " oder ' kein Stringende steht (\Z)

siehe auch https://perldoc.perl.org/perlretut#Looking-ahead-a...
Last edited: 2021-03-25 00:16:59 +0100 (CET)
Pörl.

View full thread Ersetzen Character ab definierten Positionen innerhalb eines Strings ( Single/Double Quotes)