#!/bin/ksh
while read arg; do
echo "$arg" | tr '[a-z]' '[A-Z]'
done
