note davido <p>There are a number of good ways to approach this. Here's one way that uses a CPAN module:</p> <c> use String::Palindrome qw( is_palindrome ); my @array = qw( x a m a x ); print "@array ", is_palindrome( @array ) ? "is" : "isn't ", "palindromic.\n"; </c> <p>The above solution works just as well if you pass it a string rather than an array, but in either case it does the job.</p> <div class="pmsig"><div class="pmsig-281137"> <br /><p>Dave</p> </div></div> 1010790 1010790