At the end of the day there has to be a lookup. That can be fairly quick using the translation function:

use warnings;
use strict;

my $str = <<'STR';
Les naïfs ægithales hâtifs pondant à Noël où il gèle sont sûrs d'être 
+déçus et
de voir leurs drôles d'œufs abîmés
STR

my %xlateL = (
    a => 'âà',
    c => 'ç',
    e => 'èëéê',
    i => 'ïî',
    o => 'ô',
    u => 'ùû'
    #...
    );

my %xlateU;
$xlateU{uc $_} = uc ($xlateL{$_}) for keys %xlateL; #Generate the uppe
+r case versions

eval "\$str =~ tr/$xlateL{$_}/$_/;" for keys %xlateL;
eval "\$str =~ tr/$xlateU{$_}/$_/;" for keys %xlateU;

print $str;

[download]

Prints:

Les naifs ægithales hatifs pondant a Noel ou il gele sont surs d'etre 
+decus et
de voir leurs droles d'œufs abimes

[download]

Note that æ causes a little grief however. Using a regex rather than the translation and a seperate set of tables is probably the fix for that.

This would make a good CPAN module when you've got it done. :)

DWIM is Perl's answer to Gödel

In reply to Re: Quick way to convert to ASCII by GrandFather
in thread Quick way to convert to ASCII by kettle

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.