No, I don't want to delete CRs; I just want to make sure that the last line is properly terminated with a LF. Also, I don't want to change a file unless it needs changing and I want to know which files were actually changed.

Update.

Ooooh, I like that '+>>' trick. Didn't think of that. Here is a recursive version:

#!/bin/sh
perl -MFile::Find -e'find({no_chdir=>1,wanted=>sub{/\.c(?:pp)?$/||/\.h
+$/ or return;open(Z,"+>>",$_) or warn("$_: $!\n"),return;seek(Z,-1,2)
+;<Z>eq"\n" or print(Z "\n"),warn("Fixed $_\n");close(Z)}},$ENV{DEV})'
[download]