Update perl6.html.markdown

It is actually generating fibonacci series