Maybe this will give you some ideas.

#!/usr/bin/perl
# Solution for matching "é" 
use locale ;
my $test = "é é é é " ;
$test =~ /[[:alpha:]]/ and print "YEAH\n"  ;
#OR 
$test =~ /[\w]/ and print "Thanx\n" ;
[download]