#!/bin/csh -f 
####################################################################
# 
#  De-comment a file
#
#  Calling Sequence
#
#  clean_file=`de_comment <file> [delimiter]`
#
####################################################################
if ($#argv == 0) then
   echo "Need a filename...
   exit
endif

if (!(-e $1)) then
   echo "Could not find file: "$1
   exit
endif

if ($#argv == 1) then
   set delim="#"
else 
   set delim="$2"
endif

sed s/"$delim.*"//g $1

exit

