J'ai un fichier XML :

<NODE>

<DATA>
<HEADER DATE="2007/09/13 15:17:39" ID="1000" />
<DATA1>
<DATA2 DEST="DEST1" SOURCE="SOURCE1"></DATA2>
</DATA1>
</DATA>


<DATA>
<HEADER DATE="2007/09/13 15:18:39" ID="2000" />
<DATA1>
<DATA2 DEST="DEST2" SOURCE="SOURCE2"></DATA2>
</DATA1>
</DATA>


<DATA>
<HEADER DATE="2007/09/13 15:19:40" ID="3000" />
</DATA>

<DATA>
<HEADER DATE="2007/09/13 15:19:42" ID="4000" />
</DATA>

<DATA>
<HEADER DEST="DEST4" SOURCE="SOURCE4" />
</DATA>

<DATA>
<HEADER DEST="DEST5" SOURCE="SOURCE5" />
</DATA>

</NODE>
Je voudrais convertir ce fichier XML en CSV :

2007/09/13 15:17:39 | 1000 | DEST1 | SOURCE1

2007/09/13 15:18:39 | 2000 | DEST2 | SOURCE2

2007/09/13 15:19:40 | 3000 | |

2007/09/13 15:19:42 | 4000 | |

| | DEST4 | SOURCE4

| | DEST5 | SOURCE5
est il possible de faire ça en perl ?