Select Code to Download

#!/usr/bin/env perl

...
        return $wanted_content;
    }
}

$ cat ./pm_xml_parser_test_file1.xml
<root_element>
...
<root_element>
    <filename>pm_xml_parser_test_file2.xml</filename>
</root_element>

$ pm_xml_parser_test.pl
Wanted content: 'pm_xml_parser_test_file1.xml'
Wanted content: 'pm_xml_parser_test_file2.xml'