• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>

            elva

            perl 把xml文件轉換成csv文件

            #!/usr/local/bin/perl

            # use module
            use XML::Simple;
            use Data::Dumper;

            # create object
            $xml = new XML::Simple;

            # read XML file
            $data = $xml->XMLin("DebugInfo.xml", ForceArray => 1);

            # print output
            #print Dumper($data);
            #print Dumper($data->{'employee'}[0]);
            #print Dumper($data->{'employee'}[1]);

            $data1=$data->{'DebugInfo'};

            #print @{$data1};
            open FILE,">>debug.log";
            foreach $item (@{$data1}){
            print FILE "${$item}{UID}[0],";
            print FILE "${$item}{ChannelID}[0],";
            print FILE "${$item}{IPAddress}[0],";
            if (${$item}{BufferMapString}[0] =~/^HASH/)
            {print FILE ",n";}
            else{print FILE "${$item}{BufferMapString}[0]n"};
            }
            close FILE;

            posted on 2008-08-11 19:34 葉子 閱讀(3094) 評論(0)  編輯 收藏 引用 所屬分類: UnixXML

            久久久久无码精品国产不卡| 久久青青草视频| 国产成人久久精品区一区二区| 久久久久久久国产免费看| 久久亚洲精品无码aⅴ大香| 精品一二三区久久aaa片| 狠狠干狠狠久久| 日本高清无卡码一区二区久久| 久久久亚洲欧洲日产国码aⅴ| 中文字幕成人精品久久不卡| 久久久亚洲精品蜜桃臀| 亚洲精品乱码久久久久久| 国产精品va久久久久久久| 青青青青久久精品国产h| 国产激情久久久久影院老熟女免费| 国产精品久久亚洲不卡动漫| 色婷婷综合久久久久中文| 久久香蕉综合色一综合色88| 99久久精品国产麻豆| 久久久久亚洲AV成人网人人软件| 久久久久99精品成人片牛牛影视 | 久久只这里是精品66| 精品无码久久久久久尤物| 精品免费久久久久国产一区 | 欧美丰满熟妇BBB久久久| 久久久久无码中| 99久久精品免费看国产| 精品免费久久久久久久| 久久99久国产麻精品66| 伊人久久大香线蕉精品不卡| 精品视频久久久久| 国产精品免费久久久久久久久 | 99久久免费只有精品国产| 久久综合九色综合网站| 色狠狠久久AV五月综合| 亚洲综合伊人久久综合| av色综合久久天堂av色综合在| 欧美精品九九99久久在观看| 一本色综合久久| 欧洲成人午夜精品无码区久久| 久久丫精品国产亚洲av不卡 |