Select Code to Download

use strict;
use warnings;
...
my $test = "État";
my $test2 = "É";
if ($test =~ /$test2/) {print "matches\n"} else {print "does not match
+es\n"}