");
if (($env{'form.readfile'}) || ($env{'form.bookmarks'})) {
$r->print(&checkbox($ctr-1));
} else {
$r->print(&movers($clen,$ctr));
}
}
$r->print(&hidden($ctr-1,$thash{$key},$key));
if (($clen > 1) || ($env{'form.readfile'}) || ($env{'form.bookmarks'})) {
$r->print(" | ");
unless (($env{'form.readfile'}) || ($env{'form.bookmarks'})) {
$r->print("".
&select_box($clen,$ctr).
" | ");
}
$r->print("");
$r->print("");
$r->print(" | ");
$r->print("$thash{$key}$nhash{$key} | \n");
$r->print("$key |
\n");
}
}
if (($clen > 1) || ($env{'form.readfile'}) || ($env{'form.bookmarks'})) {
$r->print("