for $in (1..195){ $c = 0; while($in != scalar(reverse($in)) && $c <= 100){ $in = $in + reverse($in); $c++; } print $in, $/ }
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page