Yes, thank you. This was the problem.
Once I changed the code from:
$authors{$author}=1;
to:
$authors{$author} = {};
Everything started working.
I was able to finally finish this in the afternoon,
and I appreciate the advice.
--Suzi (a she, not a he)