#!/bin/csh
# kedgs: global string substitution on a set of files
# syntax: kedgs string1 string2 filenames
#
#
switch ($#argv)
	case '0':
	case '1':
	case '2':
		echo 'kedgs: Too few arguments!'
		echo 'Usage: kedgs string1 string2 filenames'
		exit -1
		breaksw
	default:
		breaksw
endsw

set files = `ls $argv[3-]`
set file =
foreach file ($files)
	if(-f $file)then
		kedg "$1" "$2" $file
	endif
end
