So what is the problem?

Build a nice HoA and then do the printing.

On the other hand, you ought to quit dealing with flat files, please.

Use a RDBMS like mysql, or something like DB_File

Learn your perl data structures. Read perldata, perldsc, perllol and perlref

$NiceHash{ItemC} = [ Desc => Desc1 => Desc2 => 3 ];
[download]

____________________________________________________
** The Third rule of perl club is a statement of fact: pod is sexy.