problem on sending @array via sendmail

[Cary Hung]

Hi all,

I've trouble in sending an array via sendmail, my code:

use Mail::Sendmail;
sub mail_send
{
 %mail = (
  To      => '[EMAIL PROTECTED]',
  From    => '[EMAIL PROTECTED]',
  subject => 'ACS acknowledgment',
  Message => "This is a test.\nFile List:\n\@files\n"
         );
 sendmail(%mail) or die $Mail::Sendmail::error;
 print "OK. Log says:\n", $Mail::Sendmail::log;
}

#main

@files = ['abc.txt', 'demo.log'];
mail_send;

After receiveing email, I find the message has:

This is a test.
File List:
@files

(instead of 'abc.txt' and 'demo.log')

Any help?

Regard
Cary