#!/bin/sh

while [ 1 ] ; do

tput sc

col=`tput cols`

col=$(($col-8))

tput cup 0 $col
echo `date '+%T'`

tput rc

sleep 1

done
