how to call a subroutine of .pm file to another .pl file using perl :     I have a script Attachments.pm which contains below
    
        package app::Attachments;
    use MIME::Lite;
    BEGIN{
          use Exporter();
          @ISA    = qw(Exporter);
          @EXPORT = qw(&SendEMmsgAttachments);
          }
    sub SendEMmsgAttachments
    {
       $EM_SERVER = "1234.com";
       $EM_FROM  = "yyy@1234.com"; #hardcoded
       $EM_TIMEOUT = 120;
       my $mailMessage;
       my $mailToEmailAddress;
       my $mailSubject;
       my $mailBody;
       my $mailAttachmentFileName;
       my $mailAttachmentFullPath;
       $mailMessage = MIME::Lite->new
       (
       From    => $EM_FROM,
       To      => $mailToEmailAddress,
       Subject => $mailSubject,
       Type =>'multipart/mixed'
       )  or die "Error creating multipart container: $!\n";
       ### Add the text message part
       $mailMessage->attach
       (
       Type => 'text/csv',
       Data => $mailBody
       )  or die "Error adding the text message part: $!\n";
       ### Add the text file
       $mailMessage->attach
       (
       Encoding => 'base64',
       Type => "text",

I want to use "SendEMmsgAttachments" subroutine in my testscript.pl file so that i can send my excel attachment in email. Can anyone help me out in resolving the issue?