Script to print reverse of a given number using Korn shell functions

[srama2]

#!/usr/bin/ksh

########### Function to reverse a number ##################################

reverse()
{
rev=0
sd=0
n=$1

while [ $n -gt 0 ]
do
sd=`expr $n % 10` # get the remainder of n divided by 10
rev=`expr $rev \* 10`
n=`expr $n / 10`
done

print $rev
}

################### MAIN PROGRAM ###################################

set -vx

echo "This script will print the reverse of a given number."
echo "Enter number:"
read n
echo "Reverse of $n is:" `reverse $n`

exit 0