Reference found where even-sized list expected at mailerww.pl line 165.

$msg is:
 MIME::Lite=HASH(0x1c0162c)

F:\_wo_cya>perl mailerww1.pl


 $HoA{0}' is:  (...the expected 5 email addresses) 

no data in this part
 at mailerww1.pl line 207