Simple XML parser for perl