@datafiles = grep { -f }, readdir( D );
$_ = decode( 'utf16le', $_ ) for ( @datafiles );