It would be really nice if the code was explained in English, line by line. For a newbie Perl writer figuring out what the different items mean is almost impossible.
A guide that explains items would be most helpful. Example what the heck is findnodes what other keywords can be used and how