It is unsurprising that you are lost in your code. If there were an Ig Noble award for Software, this would have to be a front running contender.

Suggestion: Investigate strict and warnings, ditch the double spacing, and realise that you are not limited to 6 character variable names. (Why $Lngth and not $Length?).

By the time you have your code running clean of problems the compiler can tell you about, you will probably see a better way of doing what you are doing yourself, but if not, someone here will help you once they don't have to do what you can and should do yourself.