my $ending_authid = $query->param('ending_authid');
my $authtype = $query->param('authtype');
my $filefh;
if ($commandline) {
if ($commandline && $id_list_file) {
open $filefh,"<", $id_list_file or die "cannot open $id_list_file: $!" if $id_list_file;
} else {
$filefh = $query->upload("id_list_file");
-