Help for this page
print Tr( start_form(-action => url()), ... end_form(), );
... elsif (param("choice") eq "Delete") { print (param("hidden")); ...
$dataref = param("hidden"); $date = $dataref->[0];