#!/bin/sh

TMPNAME="$$tmpname"
for a in $*; do
  test -d "$a" && echo "$a is a directory." && continue
  echo -n "$a..."
  cat "$a" | perl -e 'open(TMP,"-");while(<TMP>){s/\r\n$/\n/g;print $_;}close TMP;' > $TMPNAME
  mv "$TMPNAME" "$a"
  echo "OK"
done
rm -f $TMPNAME