$sth->execute;
}
- my @results;
- while (my $data=$sth->fetchrow_hashref) {
- push(@results,$data);
- }
- $sth->finish;
- $dbh->disconnect;
- return (scalar(@results),\@results);
+ my @results;
+ while (my $data=$sth->fetchrow_hashref) {
+ push(@results,$data);
+ }
+ $sth->finish;
+ return (scalar(@results),\@results);
}
my $input = new CGI;
query => $input,
type => "intranet",
authnotrequired => 0,
- flagsrequired => {parameters => 1},
+ flagsrequired => {parameters => 'parameters_remaining_permissions'},
debug => 1,
});
$checked,
$input->param( 'rank' ),
$input->param( 'syntax' ),
- $input->param( 'timeout' ),
- $input->param( 'encoding' ) );
+ $input->param( 'encoding' ),
+ $input->param( 'timeout' ) );
}
$sth->finish;
# END $OP eq ADD_VALIDATE