print $q->h2($subtitle), "\n\n\t\n";
IDType"; foreach (my $i=1; $i<=$#USER_FIELDS; $i++) { my $flags = '?exec=list&table=users&orderby='.$i; if ($i == $index) { $flags .= '&desc=1'; } print "$LABELS{$USER_FIELDS[$i]}"; } print "