#!/bin/csh
# Takes the fuss out of uuencoding a file.
# -d flag saves as DOS .uue rather than Unix .uu .

set name = `basename $0`

if ( $#argv == 0 ) then
 echo "Usage: $name [-d] filename [filename]"
 exit 1
endif

set from_file = $1
set suffix = ".uu"

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

if ( "-d" == "$1" ) then

  if ( $#argv == 1 ) then
    echo "Usage: $name [-d] filename [filename]"
    exit 1
  endif

  set from_file = $2
  set suffix = ".uue"

  if ( $#argv == 3 ) then
    set to_file = $3
  else
    set to_file = `echo $2|sed 's/\..*//'|awk '{print substr($1,1,8)}'`
  endif

endif

uuencode $to_file < $from_file > $to_file$suffix