fixed shebang in perl parser
update foutain.pl