[ViewVC] Contents of: cvs/deliantra/arch/dev/scripts/updatearch

#!/bin/csh

foreach i ( *.arc ) 
        mv $i $i.bak 
#       echo "using $* on $i.bak"
        perl -p -e "$*" $i.bak > $i 
        if ($status == 0) then
                rm $i.bak
        else
                mv $i.bak $i
        endif
end
Revision:	1.1
Committed:	Mon Feb 6 20:26:11 2006 UTC (18 years, 5 months ago) by root
Branch point for:	UPSTREAM, MAIN
Log Message:	Initial revision
#	Content
1	#!/bin/csh
2
3	foreach i ( *.arc )
4	mv $i $i.bak
5	# echo "using $* on $i.bak"
6	perl -p -e "$*" $i.bak > $i
7	if ($status == 0) then
8	rm $i.bak
9	else
10	mv $i.bak $i
11	endif
12	end