push (@rows, Tr (td (\@cells),(td (\@cells2))));

$page .= table ({-border => 3, width=> 550}, @rows) . br ( );