XML Parser :: :: Wrapper เป็นโมดูล Perl สำหรับการแยก XML XML Parser :: :: Wrapper เป็นเสื้อคลุมด้านบนของตัวแยกวิเคราะห์ XML :: ที่ให้ API เป็นมิตรมากขึ้นมา
สรุปมา
ใช้ XML Parser :: :: Wrapper.
$ XML ฉัน = QQ {Hello World!};
ราก my $ = XML Parser :: :: Wrapper-> ใหม่ ($ XML);
$ root2 ฉัน = XML Parser :: :: Wrapper-> ใหม่ ({แฟ้ม => '/tmp/test.xml'});
$ root_tag_name ของฉัน = $ root-> ชื่อ;
$ roots_children ของฉัน = $ root-> องค์ประกอบ;
foreach $ องค์ประกอบของฉัน (@ $ roots_children) {
หาก ($ element-> ชื่อ EQ 'หัว') {
id my $ = $ element-> attr ('id');
hello_world_text $ = $ element-> ข้อความของฉัน; # EQ "Hello World!"
}}
$ HEAD_ELEMENT ของฉัน = $ root-> องค์ประกอบ ('Head2');
$ head_elements ของฉัน = $ root-> องค์ประกอบ ( 'Head2');
$ การทดสอบของฉัน = $ root-> องค์ประกอบ ('Head2') -> องค์ประกอบ ('test_tag');
$ new_element ของฉัน = $ root-> add_child ('test4', {attr1 => 'VAL1'});
$ เด็กของฉัน = $ root-> update_kid ('root_child', {attr2 => 'stuff2'} 'blah');
$ Kid-> update_node ({new_attr => 'new_stuff'});
$ new_element-> add_child ('เด็ก', {myattr => 'สิ่ง'} 'bleh');
new_xml $ = $ รากของฉัน -> to_xml;
ต้องการ
- Perl
ความคิดเห็นที่ไม่พบ