print DESTINATION "old: $_\0new: $line\n";