splice @threads, $i, 0,  
        '<ul type=\"disc\">', "$link",'</ul>';