perl escape chars!

[Apollon Koutlides]

Antonis Faragitakis wrote:

> Apollon Koutlides wrote:
>
>> Antonis Faragitakis wrote:
>>
>>> mipos gnorizi kapoios pos agnorizi i perl se ena windows text 
>>> document to paragraph mark
>>> etsi oste na to kano replace me tipota!?
>>
>>
>>
>> Δεν είμαι σίγουρος τι εννοείς "paragraph mark", ωστόσο αν ξέρεις το 
>> charcode του μπορείς να χρησιμοποιήσεις octal ή hex notation σε ένα 
>> regex, π.χ.:
>>
>> $string =~ s/\033//;       # Octal 033
>> $string =~ s/\x1B//;       # Hex 1B
>> $string =~ s/\x{263a}//;   # Wide Hex (painful multibyte-char issues 
>> notwithstanding)
>>
>>
> iparxei autos o kodikas (word macro)

!!! ...no comments

>
> With Selection.Find
>        .Text = "<NTMMemoryDb>^p<Description>^pArchive^p</Description>^p"
>        .Replacement.Text = ""
>   End With
>
> o opios opou brei:
>
> <NTMMemoryDb>
> <Description>
> Archive
> </Description>
>
> to kanei replace me tipota, to sbini diladi.
>
> se perl egrapsa to 
> s/<NTMMemoryDb>\n<Description>\nArchive\n</Description>\n//; alla 
> tipota, to idio isxi kai gia to \r\n kai \r
> distixos den ksero to charcode
>
> kamia idea!?

Ναι, δοκίμασε να κάνεις backslash-escape το forward-slash στο 
"</Description>". Θα πρότεινα και ένα s option στο τέλος του 
substitution sequence (μετά το τελευταίο forward-slash).
Πριν από αυτό "λύσε" το ζήτημα του πιθανού CRLF κάνοντας ένα 
s/\r\n/\n/gs (εκτός και αν σου χαλάει τη σούπα το vanilla CR line 
termination)

Ακούς εκεί Word!!! (δεν κρατήθηκα)
-------------- next part --------------
A non-text attachment was scrubbed...
Name: apollon.vcf
Type: text/x-vcard
Size: 348 bytes
Desc: not available
URL: <http://lists.hellug.gr/pipermail/linux-greek-users/attachments/20050819/7aa85fc7/attachment.vcf>