Replace escape <,> with <, >

for i in *.html.docuwiki; do perl -pi -e "s/&gt;/>/g" $i; done
for i in *.html.docuwiki; do perl -pi -e "s/&lt;/</g" $i; done
This commit is contained in:
2021-03-11 23:50:37 +00:00
parent 11889ecf9e
commit c81979dcbf
63 changed files with 573 additions and 573 deletions
+3 -3
View File
@@ -99,10 +99,10 @@ Some Simple Encryption by tfurrows
205
210 FOR I = 1 to LEN(M$)
215 C=C+1
220 IF C&gt;16 THEN C=1
220 IF C>16 THEN C=1
225 L = POS(A$(C),SUBSTR(M$,I,1),1)
230 IF L &lt; LEN(A$(C)) THEN PRINT SUBSTR(A$(C),L+1,LEN(A$(C))-L);
235 IF L &gt; 1 THEN PRINT SUBSTR(A$(C),1,L) ELSE PRINT SUBSTR(A$(C),1,1)
230 IF L < LEN(A$(C)) THEN PRINT SUBSTR(A$(C),L+1,LEN(A$(C))-L);
235 IF L > 1 THEN PRINT SUBSTR(A$(C),1,L) ELSE PRINT SUBSTR(A$(C),1,1)
240 NEXT i
"