sub index_menu { return [ map { anchor(textify($_) => {href => $_}) } sort { article_sort($a,$b) } grep { m/^[A-Z]./ && -f $_ } file_list(shift() // '.') ]; }