use utf8;

use Test::More;
use Test2::Plugin::UTF8;
use Devel::Peek;
use Encode;
use File::Find::Rule;

# the file's 1st letter is greek kappa,
# 2nd letter is iota accented (with tonos)
my $expected = 'test/κί.png';
my @gots = map { Encode::decode_utf8($_) }
  File::Find::Rule->file()->name(qr/.*\.png/)->in('test')
;
is(scalar(@gots), 1, "got 1 item");
is($gots[0], $expected, "name is as expected");

Dump($expected);
Dump($gots[0]);

done_testing();