Ciao ho il file nel seguente formato

All'inizio del file
---------------------------------------
il mio nome alcune dfgfgfk jdksjdkls sdlsdls laladsl
.
.
.
kfdjkfdk alcuni DRT pro VHDL sdjls.
-------------------------------------------------- --------------
ddr.spw.df.df 0 0 0 0 0
ddr.ser.ddf.tp 1 2 3 4 1
ddr.pwq.pro.fgt.tp 1 3 4 5 7
eth.pro.iw 1 2 3 4 5
eth.3po.lk 1 2 5 6 7
eth.3yu.lo 3 4 5 6 9

-------------------------------------------------- ------
fine del file

Ora voglio seprate tutte le linee che iniziano con DDR e la loro somma di colonna 5, similiarly voglio seprate tutte le linee che iniziano con ETH e il loro importo di colonna 5. La parte superiore del file, come illustrato potrebbe consistere in alcuni punto che non ho bisogno di prendere in considerazione. Quindi, per favore qualcuno può aiutare con perl script per eseguire questa operazione.

Grazie