#! /bin/ksh

while read line
do
	line=`echo $line | expand`
	echo "$line"
	echo "$line" | sed 's/./-/g'
done