copy "$source/$file", "$dest$file"
  or die "Can't copy file $file: $!";