Help for this page
# detects if a binary string 1101010010001... # has a Fibonacci spacing 0,1,1,2,3,5,... of the 1's ... $ # that is all there is /x; print "Largest sequence matched was $largest\n";
It is a Fibonacci sequence Largest sequence matched was 5