Select Code to Download

        foreach $workerbee($doc->getElementsByTagName('CathStaff'))
        {
            
...
        
            
        }

!/usr/bin/perl -w
use XML::DOM;
use CathRecord;
...

    
}

Staff = Joicelan, Rob
Staff = Zdoctor, test
Staff = Zdoctor, test
...
Other: rusoo123456789012 mike56789012345
Rad: rusoo123456789012 mike56789012345
Physician: rusoo123456789012 mike56789012345