Select Code to Download

use utf8;

 #this decode utf8 routine is used so filenames with extended
   # ascii characters (unicode) in filenames, will work properly
...
   #$_ = decode( 'utf8', $_ ) for ( @files );
   @files = map { decode( 'utf8', "$path/".$_  ) } sort @files;

use Encode;
my $file = decode('utf8', $file)