Select Code to Download

#!/usr/bin/perl

...
my $test = "État";
my $test2 = "É";
if ($test =~ /$test2/) {print "$test matches $test2\n"} else {print "d
+oes not matches\n"}