It seems that posting to the list is often the catalyst that provides
enough activation energy to prompt the revelation that gives me the answer
I need.
I now see the folly of
if (/^(.+)_(\d+)$/) {
$script_info[$2] = { 'id' => $2, }
$script_info[$2]->{$1} = $q->param("$_");
}
which I subsequently changed to :
if (/^(.+)_(\d+)$/) {
$script_info[$2] = { 'id' => $2, } unless {
defined($script_info[$2]) };
$script_info[$2]->{$1} = $q->param("$_");
}
and thereby eliminated my problem.
Thanks
Peter Cline
Inet Developer
New York Times Digital