do { print "$_ could not be restored!\n" unless ( exists $found{$_} ) } foreach (@files);
####
foreach (@files) {
print "$_ could not be restored!\n" unless ( exists $found{$_} );
}
####
exists $found{$_} or print "$_ could not be restored!\n" foreach @files;