unless ($old eq $new_files) { copy("$old", "$new_files") or die "Copy failed: $!"; }