#! /usr/bin/perl use warnings; use strict; use utf8; use Text::Unidecode; my $input = 'Montréal Centre-ville'; print unidecode($input); __END__ Output: Montreal Centre-ville #### open my $IN, '<:encoding(UTF-8)', 'input.txt' or die $!;