in reply to Can someone help me to explain the code below

Great. You added code tags, but please do not start a new thread.

See my other suggestions in: Re: explain code

In Section Seekers of Perl Wisdom