批處理新手入門導讀[視頻教程]批處理基礎視頻教程[視頻教程]VBS基礎視頻教程
[批處理文件精品]批處理版照片整理器[批處理文件精品]純批處理備份&還原驅動在線第三方下載
返回列表 發帖

[問題求助] perl解析singer.xml報錯

<?xml version="1.0" encoding="UTF-8"?>
<playlist version="1" xmlns="http://xspf.org/ns/0/"
xmlns:vlc="http://www.videolan.org/vlc/playlist/ns/0/">
        <title>歌手姓名</title>
        <trackList>
                   <track>
                                <album>Winnie Ho - Finally Chapter 01 (2016)
/</album>
                                <title>01 - Me and Myself.mp3</title>
                                <location>位置1</location>
                                <duration>172000</duration>
                   </track>
                   <track>
                                <album>Winnie Ho - Finally Chapter 01 (2016)
/</album>
                                <title>02 - Keep in Touch.mp3</title>
                                <location>位置2</location>
                                <duration>200000</duration>
                   </track>
                   <track>
                                <album>Winnie Ho - Finally Chapter 01 (2016)
/</album>
                                <title>03 - Missing.mp3</title>
                                <location>位置3</location>
                                <duration>207000</duration>
                   </track>
         </trackList>
</playlist>

=================

1樓是singer.xml

回復 1# netdzb

use strict;
use warnings;

use XML::Simple;
use Data:: Dumper;

use 5.010;
my $xmlfile = "singer.xml";
my $xml = XML::Simple->new(KeyAttr=>"", ForceArray => 1);

my $tree = $xml->XMLin($xmlfile);
say Dumper($tree);

TOP

返回列表
广西快乐双彩开奖结果查询今晚