#!/usr/bin/csh
###########################
# Name: 
# Author:
# Description:
# Date: 
###########################

   who | awk '{print $1}' > $$tmp
   set arrayName = `cat $$tmp`

   foreach name ($arrayName)
     echo $name
   end	

unalias rm
rm -f $$tmp
alias rm 'rm -i'