Aufgabe 1

#! /usr/local/bin/bash

for i; do 
   if [ -f $i ]; then
      head -2 $i | (
         read sep
	 echo "${i%\.*}	${sep}"
	 IFS=$sep
	 read line
	 set $line
	 col=1
         for i in "$@"; do 
	    echo "	$i	$col"; 
	    let col=$col+1
	 done
      )
   fi
done

Aufgabe 2

#! /usr/local/bin/bash

table=$1
shift

ret=`
   CR_INDEX ${table}.header | (
      read name sep
      echo -n "sep=$sep; "
      while read line; do
         set $line
         echo -n "$1=$2;" 
      done
      ) 
   `
eval $ret

arg=""
for i; do
   arg="$arg${arg:+,}\$$i"
done
eval arg="$arg"

cut -d $sep -f "$arg" ${table}.data


Michael Lehn 5/15/1999