Re^2: Palindrome Program without Reverse function

Clever, but slow:

sub isPalindrome{
    substr( $_[0], $_, 1 ) eq substr( $_[0], -($_+1), 1 )
        or return for 0 .. length( $_[0] ) >> 1;
    1;
}
[download]

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on Re^2: Palindrome Program without Reverse function Download Code