try to use "locale" with german and coepage 437 (dos)

[mathias wündisch]

Hi,

i look for informations about the use of the perl pragma "locale". the
reason why: i have old input data coded with codepage 437. and i want
to use the normal matchingcharacter \b (non alphabetic char) and \w
(alphabetic char).
i found a lot of site about posix under linux but i work under windows
xp. am i the first with this problem?
i want to tell perl what byte between 32 and 255 is a allphabetical
character (\w) and what is not (\b).
thanks for ideas.

bye, mathias

 

[jm]

mathias wündisch a écrit :

Hi,

i look for informations about the use of the perl pragma "locale". the
reason why: i have old input data coded with codepage 437. and i want
to use the normal matchingcharacter \b (non alphabetic char) and \w
(alphabetic char).
i found a lot of site about posix under linux but i work under windows
xp. am i the first with this problem?
i want to tell perl what byte between 32 and 255 is a allphabetical
character (\w) and what is not (\b).
thanks for ideas.

bye, mathias

What's about using Encode module, with decode function to transform your
IBM/CP 437 data to utf-8, and then using utf-8 (transparently) behaviour
of perl regex?

 

[mathias wündisch]

What's about using Encode module, with decode function to transform your
IBM/CP 437 data to utf-8, and then using utf-8 (transparently) behaviour
of perl regex?

dear jm, ok this is a good idea! i will try this. thanks for
suggestion. m.