use utf8;

##</code><code>##

use strict;
use warnings;
use utf8; # I will write this script in UTF-8
use open qw(:std :locale); # All files to be open in the native cp
use locale; # I want my string comparisons according to native locale

##</code><code>##

use open qw(:std :locale);

##</code><code>##

use open qw(:locale);