\n"; @knowns = &list_knowns(); if (@knowns) { print &ui_form_start("delete_knowns.cgi", "post"); print &ui_links_row(\@links); @tds = ( "width=5", undef, "nowrap" ); print &ui_columns_start([ "", $text{'knowns_hosts'}, $text{'knowns_type'}, $text{'knowns_key'} ], undef, 0, \@tds); foreach $k (@knowns) { print &ui_checked_columns_row([ "". join(" | ", map { &html_escape($_) } @{$k->{'hosts'}})."", &html_escape($k->{'type'}), "".&html_escape(substr($k->{'key'}, 0, 40)). " ... ". &html_escape(substr($k->{'key'}, -40))."" ], \@tds, "d", $k->{'index'}); } print &ui_columns_end(); print &ui_links_row(\@links); print &ui_form_end([ [ "delete", $text{'knowns_delete'} ] ]); } else { print "$text{'knowns_none'}
\n"; print &ui_links_row([ $links[2] ]); } &ui_print_footer("", $text{'index_return'});