[perl5.git] / mv-if-diff

: mv-if-diff file1 file2
: move file1 to file2 if file1 and file2 are different.

if test $# -lt 2 ; then
	echo "usage:  $0 file1 file2"
	echo "move file1 to file2 if file1 and file2 are different."
	exit 1
fi
if cmp $1 $2 >/dev/null 2>&1; then
	echo "File $2 not changed."
	rm -f $1
else
	rm -f $2
	mv $1 $2
fi
Commit	Line	Data
a0d0e21e LW	1	: mv-if-diff file1 file2
	2	: move file1 to file2 if file1 and file2 are different.
	3
	4	if test $# -lt 2 ; then
	5	echo "usage: $0 file1 file2"
	6	echo "move file1 to file2 if file1 and file2 are different."
	7	exit 1
	8	fi
	9	if cmp $1 $2 >/dev/null 2>&1; then
	10	echo "File $2 not changed."
23b65447	11	rm -f $1
a0d0e21e	12	else
28e8609d	13	rm -f $2
a0d0e21e LW	14	mv $1 $2
a0d0e21e LW	15	fi