for i in *
do
# $Id: substituer,v 1.2 2007/08/29 10:51:52 pda Exp $

    sed -e 's/mot-de-passe-de-dns/azertyuiop/'
	-e 's:^#!/usr/local/bin/tclsh8.4:#!/usr/local/bin/tclsh8.4:' \
	$i > $i.NEW && mv $i.NEW $i

done
