in reply to what does "res" do?

Its a secret. Where did you find that code?

In Section Seekers of Perl Wisdom