fionbarr has asked for the wisdom of the Perl Monks concerning the following question:

hi...is there a module which will convert non-ascii chars to the closest analogue...for example...smart quotes to quotes?

Replies are listed 'Best First'.
Re: convert non-ascii chars
by thundergnat (Deacon) on Apr 02, 2012 at 17:51 UTC
Re: convert non-ascii chars
by CountZero (Bishop) on Apr 02, 2012 at 21:09 UTC
    If you just want to replace all kind of "funny" quotes by single straight quotes, you can try:
    use Modern::Perl; my $string = 'Test:' . chr(0x0022) . chr(0x00AB) . chr(0x201C) . chr(0 +x201F) . chr(0x301D); $string =~ s/\p{Quotation_Mark}/'/g; say $string;

    CountZero

    A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

    My blog: Imperial Deltronics