Кодировка: используйте 'utf8' - Quesiton

Question

Могу ли я опустить use 'utf8' -прагму, когда я уже использую use encoding 'utf8'?

#!/usr/bin/env perl
use warnings;
use 5.012;
use Encode qw(is_utf8);

use encoding 'utf8';


my %hash = ( '☺' => "☺", '\x{263a}' => "\x{263a}", 'ä' => "ä", 'a' => "a" );
for my $key ( sort keys %hash ) {
    say "UTF8 flag is turned on in the STRING $key" if is_utf8( $hash{$key} );
    say "UTF8 flag is NOT turned on in the STRING $key" if not is_utf8( $hash{$key} );
}

Answer 1

Я предлагаю вам прекратить использовать encoding, а не utf8.Первое вызывает очень странное поведение.

use utf8;                  # Source code is UTF-8
use open ':std', ':utf8';  # STDIN,STOUT,STERR is UTF-8.

Answer 2

Да, но убедитесь, что вы знакомы с CAVEATS в perldoc.