draw html tables and send in mail

[Irfan Sayed]

Hi All, 


I wrote perl script to draw html tables and send that html tables in mail . i 
used two modules 1: html::tables and 2: mail::sendmail 

but when i send mail , it never prints the actual table in the mail body

following is the code snippet,

use HTML::Table;
use Mail::Sendmail;

$table = new HTML::Table(2, 2);
                print '<p>Start</p>';
                print $table->getTable;
                print '<p>End</p>';  

  %mail = ( To      => 'a...@abc.com',
            From    => 'a...@abc.com',
            Message => "$table",
            'content-type' => 'text/html; charset="iso-8859-1"',
           );
  
  $mail{body} = $table;

  $mail{smtp} = 'ustu-zone.relay.abc.com';
  sendmail(%mail) or die $Mail::Sendmail::error;
  print "OK. Log says:\n", $Mail::Sendmail::log;

plz suggest