請教個perl腳本寫法，謝謝

lmwzmf

我需要寫一個perl程序，連接informix數(shù)據(jù)庫，將獲取的字段值寫入到xml文件中，xml文件名根據(jù)當前時間整點生成

讀取數(shù)據(jù)庫字段值的sql需要單獨寫到一個配置文件中config.xml，內(nèi)容如：select a.text  test,a.text1  test1 from wyeh a where a.time='2010-08-23 00:00:00'

生成的xml格式如下，名稱應(yīng)該為 HB_YY_TEST-0-20100823.xml：

<xsdAYKPISet xsdAYKPISetName="VOICENET2">
     <xsdAYStatItem xsdAYKPISetTime="2010-08-23" xsd:statisticName="HB" >
                        <xsd:test xsd:kpiTime="ALL">4563</xsd:test>
                        <xsd:test1 xsd:kpiTime="ALL">65.46</xsd:test1>
      </xsd: DAYStatItem >
……………………..
      <xsdAYStatItem xsdAYKPISetTime="2010-08-23" xsd:statisticName="WH" >
……………………..
  </xsdAYKPISet >


  麻煩哪位老大幫忙編寫個perl的腳本語句，謝謝

Mr-Summer

use DBI;
use XML::Simple;
connect();
fetchrow_hashref();
XMLout();

珞水的大叔

這個……
樓主起碼要先顯示出誠意
把自己寫的代碼放上來才好啊

樓上給出的模塊和函數(shù)已經(jīng)可以解決問題了，樓主加油

KevinLee39

樓主夠暈的啊, 直接這樣就來要了.

就這個任務(wù)來說, 用DBI一點都不好, 你還要自己去編譯安裝Informix的驅(qū)動........在具體環(huán)境里還不一定能編譯成功, 這一點上perl很悲劇啊, java的jar包確實方便.

其實直接調(diào)用dbaccess就行了, 把數(shù)據(jù)unload到文本, 然后讀取進來, 再生成xml的格式.

你要是實在不想自己寫, 付費我給你寫.

lmwzmf

回復(fù) 2# Mr-Summer


    好久沒上了，我已完成，雖然沒用這種方式，不過謝謝了！

lmwzmf

回復(fù) 3# 珞水的大叔


    呵呵，誠意？需不需要帶禮物��？不過，還是謝謝你的回復(fù)，我已完成了

lmwzmf

回復(fù) 4# KevinLee39


    你呢，關(guān)于技術(shù)這塊，說的是對的，不過前后的話語，我只能心里問候下你了，悲哀的，順便說下，我早就寫完了，不用給你付費了

spacen2046

LZ真有樂

nuclearxin

說說怎么完成的 讓俺們也學(xué)習(xí)學(xué)習(xí)