perl escape chars!

Giannis Papaioannou jhn at aix.meng.auth.gr
Fri Aug 19 16:26:58 EEST 2005


just googled
http://www.wellho.net/solutions/perl-using-perl-to-read-microsoft-word-documents.html
http://search.cpan.org/~johanl/Win32-Word-Writer-0.02/lib/Win32/Word/Writer.pm

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)
> 
> 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!?
> 
> Filika
> Antonis
> 
> 
> 
> 

-- 
----------------------------------------------------------
Giannis Papaioannou - Systems Administrator
Laboratory of Heat Transfer and Environmental Engineering
Aristotle University of Thessaloniki, Greece
Tel:+30 2310 996350 Fax:+30 2310 996012
----------------------------------------------------------




More information about the Linux-greek-users mailing list