Re: Finding longest palindrome from a string

[Random_Walk]

Nice puzzle, I offer my humble attempt

sub Random_Walk { my ($left, $right, $pal, $i)=("", "", "", 1); my $test=join " ", @ARGV; for (; $i<((length $test)/2)+2; $i++) { $left.="(.)"; $right="(\\$i)".$right; if ($test=~/$left.?$right/) {$pal=$&; next} return $pal; } }

I tried a recursive one first which was fun but I had to do lots of work to cut the string into different slices so regex it is.

cnn, Thanks for the hint on code blanking.

Off by two error fixed in the for loop

Added .? in the middle to allow palindromes symetrical around a single character (borrowed that idea from ccn ;)

[ccn]

I do not know how to black the code out

You can use

<table><tr><td bgcolor="#000000" color="#000000">

[[[ YOUR CODE HERE ]]]

</td></tr></table>