in reply to Re: Palindrome Program without Reverse function
in thread Palindrome Program without Reverse function

Tested, fixed: sub is_palindrome {length($_[0])<2||substr($_[0],0,1) eq substr($_[0],-1,1)&&is_palindrome(substr($_[0],1,-1))}