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