utf8::downgrade($file);
  unless (-e $file) { ........