my $table = DBIx::XHTML_Table->new('DBI:Pg:dbname=misdb', 'pluser', '');

$table->exec_query("$sql");

$table->modify(table => {
     width  => '100%',
     cellspacing=> '2',
     cellpadding=>'5',
  });

$table->modify(th => {
  style => {
    color      => '#FFFAF0',
    background => '#4682B4',
    'text-align' => 'center',
    'text-transform'=> 'uppercase',
  }
},'head');

$table->modify(tr => {
  style => {
    background => ['#B0C4DE','#F0F8FF'],
  }
});
  $table->modify(td => {
    style => {
    'text-align' => 'left',
    'white-space' => 'nowrap',
    }
  });
  $table->modify(td => {
    style => {
    'text-align' => 'center',
    'white-space' => 'nowrap',
    }
  },['Projects','Tasks','EstimatedDays','SpentDays']);

$table->modify(th => {
   style => 'background: #FFF0F5'
},'foot');
if (param('radio-report') eq 'Summary'){
        $table->calc_totals(['Projects','Tasks','EstimatedDays','SpentDays']);
}else{
        $table->calc_totals(['Tasks','EstimatedDays','SpentDays']);
}