Help for this page
use Net::FTP; `/usr/bin/zip -r zipfile.zip /directory/to/zip/`; #-r means recurse ... $ftp->cwd("/incoming"); $ftp->put("zipfile.zip"); $ftp->quit;
use Mail::Sender; `/usr/bin/zip -r zipfile.zip /directory/to/zip/`; #-r means recurse ... msg => "your message here.", file => 'zipfile.zip'});