File::Find and character encoding problem (fixed)

Select or download this

   $working_directory = encode('UTF-8', $working_directory);

Select or download this

   find (\&wanted, $working_directory);
    sub wanted
...
        print LOGFILE "ERROR: $working_file does not exist!!! ABORTING
+!!!\n";
        exit 1;
        }

Select or download this

   use utf8;

Select or download this

   <?xml version="1.0" encoding="UTF-8" standalone="no"?>
   <!DOCTYPE glade-interface SYSTEM "glade-2.0.dtd">
   <!--Generated with glade3 3.4.0 on Sat Nov  3 19:55:02 2007 -->

Select Code to Download