#program to check whether a entered string is palindrom or not

echo Enter the string
read s
echo $s > temp
rvs="$(rev temp)"
if [ $s = $rvs ]
then
        echo "it is palindrome"
else
        echo " it is not"
fi

-----************-------------***************_-_-_-_-_-_-_-_-####%%$$$$-------********----

len=0 

i=1 

tag=0 

echo -n "Enter a String: " 

read str 

len=`echo $str | wc -c` 

len=`expr $len - 1` 

halfLen=`expr $len / 2` 

while [ $i -le $halfLen ] 

do

c1=`echo $str|cut -c$i` 

c2=`echo $str|cut -c$len` 

if [ $c1 != $c2 ] ; then

i=$halfLen 

tag=1 

fi

i=`expr $i + 1` 

len=`expr $len - 1` 

done

if [ $tag -eq 0 ] 

then

echo "String is Palindrome" 

else

echo "String is not Palindrome" 

fi

-----************-------------***************_-_-_-_-_-_-_-_-####%%$$$$-------********----

tput clear

echo "Enter String :- \c"

read str

len=`expr $str|wc -m `

len=`expr $len - 1`

len1=`expr $len `

echo "Reverse String :- \c"

while [ $len -ne 0 ]

do

s1=` expr $str|cut -c$len `

echo "$s1\c "

len=` expr $len - 1 `

done

len=`expr $str|wc -m `

len=`expr $len - 1`

echo  ""

n=1

flag=0

while [ $len -ne 0 ]

do

        fst=` expr $str|cut -c$n `

lst=` expr $str|cut -c$len `

len=` expr $len - 1 `

n=` expr $n + 1`

if test $fst != $lst

then

flag=1

fi

done

if test $flag = 1 

        then

                echo "Given String Is Not Palindrome"

else

echo "Given String Is Palindrome"

fi