in reply to Re: UTF-8 and readdir, etc.
in thread UTF-8 and readdir, etc.

use Encode::Locale ();
use Encode ();

opendir my $dh, '/some/dir' or die $!;
while ( my $fn = readdir $dh ) {
  $fn = Encode::decode( locale_fs => $fn ); 
  # $fn is just a filename as char stream (unicode)
}
closedir $dh;

[download]

Replies are listed 'Best First'.
Re^3: UTF-8 and readdir, etc.
by Anonymous Monk on Jan 31, 2018 at 18:45 UTC

    also instead of

    opendir my $dh, '/some/dir' or die $!;

    it's better to have

    my $dir = '/some/dir'; # unicode
# get it as fs representation
my $fs_dir = Encode::encode( locale_fs => $dir );
opendir my $dh, $fs_dir or die $!;

    [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom