使用XML::TreeBuilder，
所以請先從ppm安裝。

# -- 建新的XML Tree --
my $tree = XML::TreeBuilder->new;
# -- Parse File --
$tree->parse_file('直接打檔案名稱');

# -- 從tree中，找出tag --
foreach my $Tag_Name($tree->find_by_tag_name('輸入xml裡面的某一個tagName')){
# -- attr_get_i 取出這個tag裡面的屬性 --
my $value = $Tag_Name->attr_get_i('屬性name');
print "$value\n";
}
# -- tree用完了，砍掉 --
$tree = $tree->delete;
arrow
arrow
    全站熱搜

    chenys 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄