#!/bin/csh -f 

foreach i ($1/x*gz)
	zcat $i | perl -p -e 's/M2S30/M2S35/' | gzip -9 -c > $i.2
	/bin/mv -f $i.2 $i
	echo $i
end
