in reply to XPATH Looping

Please make the script compilable, it won't run as is

In Section Seekers of Perl Wisdom