使用发送网格Perl库发送文件附件

Question

我正在使用perl Sendgrid库在我的项目中发送邮件。 我想在邮件中添加附件。但没有成功。以下是我的代码

use Mail::SendGrid;
use Mail::SendGrid::Transport::REST;

my($mail)=Mail::SendGrid->new( 
                  from => "info@example.com",
                  to =>  'user@gmail.com',
                  subject =>  'My Subject',
                  html => 'My content'
            );

$mail->addAttachment('/var/path/to/file/test.jpg'); 

my $trans = Mail::SendGrid::Transport::REST->new( username => 'username', password => 'password'  );
my $error = $trans->deliver($mail);     

我尝试使用attachment属性，但不起作用。