use CGI(:html2); #### print table( {border => 1}, map Tr( th({align=>'right'},$_),td[param($_)] ), param() ),