perl Vergleichen Sie zwei Zeichenfolgen und markieren Sie nicht übereinstimmende Zeichen

8
%Vor%

Ausgabe. Wo die Nichtübereinstimmung (in diesem Fall E) durch HTML-Tags um E ersetzt wird, die es färben.

%Vor%

Was ich bisher versucht habe: XOR, diff und substr. Zuerst muss ich die Indizes finden und dann diese Indizes durch das Muster ersetzen.

    
Jabda 21.05.2013, 23:56
quelle

6 Antworten

7
%Vor%

Druckt A**E**ABBBBBCC**E**CCDDDDD

Etwas getestet. Kann Fehler enthalten.

    
mzedeler 22.05.2013, 00:04
quelle
9
%Vor%     
FMc 22.05.2013 02:13
quelle
4
%Vor%

Ausgabe

%Vor%

Ein einfacherer Ausdruck, der nur die zweite Zeichenfolge ausgibt:

%Vor%

Outout

%Vor%     
perreal 22.05.2013 00:14
quelle
3

Dies könnte bei großen Strings speicherintensiv sein.

%Vor%

AUSGABE:

%Vor%     
chrsblck 22.05.2013 00:14
quelle
2

Es gibt mehrere Möglichkeiten, dies zu erreichen. Unten ist ein möglicher Weg, dies zu lösen.

%Vor%

Die Ausgabe ist:

%Vor%     
Bill 22.05.2013 00:13
quelle
2

Ausrichten von Spalten und Verwenden von Bitwise String Operator "^":

%Vor%

gibt:

%Vor%     
Dan Jacobson 23.05.2015 01:18
quelle

Tags und Links