Re: [hylafax-users] Confirm mail with attacched TIFF

[<pmarinelli@vulcaniasystem.com>]

You could write a little script with perl that with Mail::Sender Module 
send an attach.
you should modify the script notify in spool/bin to run your script
We are developing an extension to hylafax that handle all incoming/send fax 
via a big perl script (> 1500 lines) + DB connection
+ user interface for user/manager in Delphi (for Win users) it will be free 
for software developer/sistem intergator/and no profit organization

# this routine is taken directly from ours script, you should modify with 
proper variable and discover your fax image to pass correctly


sub pmsendmail {
     my($pmuser,$pmsubj,$pmmsg,$pmpath)=@_;

     my($linea,$sender,$rempath,$pmdisp);

     $sender=new Mail::Sender {
         smtp=> $PMHOSTNAME,
         from => $PMUSERFAX,
         boundary => 'this-is-a-mail-boundary-123456',
     };
     $sender->OpenMultipart({
         to => "$pmuser",
         subject => "$pmsubj"
     });
     $sender->Body;
     foreach $linea (@$pmmsg){
         $sender->SendLine($linea);
     }
     if($pmpath){
         ($rempath) = $pmpath =~ /.*\/(.*)/;
         $pmdisp="attachment\; filename=\"$rempath\"";

         #Here we are sending an attach file

         $sender->SendFile({
             description =>  'fax allegato',
             ctype => 'image/tiff',
             encoding => 'Base64',
             disposition => $pmdisp,
             file => $pmpath
         });
     }
     $sender->Close;
}


Thanks to  Jan Krynicky  for his great module

Good luck

-----------------------------------------------------------
Vulcania System -
	Specialisti in Open Source/Internet/Intranet application
	Forniture di server pre-configurati linux, connettivit� ADSL,
	outsourcing, sviluppo su commessa	

Via Don Sturzo 6
37138 Verona Italy
Tel 045-8103655    Fax 045-8196245

http://www.vulcaniasystem.com



____________________ HylaFAX(tm) Users Mailing List _______________________
 To unsub: mail -s unsubscribe hylafax-users-request@hylafax.org < /dev/null