perl模組之MIME Lite傳送有附件的郵件

2021-06-02 19:59:24 字數 1774 閱讀 6179

前些日子做了乙個自動發郵件的perl指令碼,因為考慮到要使用附件所以使用了mime::lite 模組,用它來建立並傳送帶mime 指定型別附件的郵件。mime 是在郵件中附帶各種檔案文件的標準方式。

首先,建立包含郵件各種頭資訊的 mime::lite 物件:

123

4567

8

use mime::

lite

;

$msg

= mime::

lite

->

new(

from  =>

'[email protected]'

,

to   =>

'[email protected]'

,

subject =>

'you want awstats ?'

,

type  =>

'multipart/mixed'

)

;

然後用 attach 方法新增附件內容:

123

4

$msg

->

attach

(

type    =>

'auto'

,

path    =>

'/root/awstats.gz'

,

)

;

mime::lite     模組的引數型別決定附件的型別和附件的新增方法:

path     指定作為附件的檔案的路徑

filename     指定接受方儲存附件時,附件的預設檔名。如果指定了 path 引數,那麼預設的檔名就是路徑中的名字

data     指定附件新增的日期

type     指定待新增附件的檔案編碼型別

disposition    它的值只能是 inline 和 attachment。前者指定接受方開啟郵件的時候附件內容會跟在郵件正文後顯示,而不單獨作為乙個附加物。後者指定接受方應該指定乙個附件的解碼方 法,並且儲存附件,此時會有提示

1

2

$msg

->

send()

;# 預設的方法是用sendmail規則傳送

$msg

->

send

('smtp'

,'mailserver.example.com'

, timeout =>

30,debug =1)

;# 指定其它的方法

使用方法

1
echo

'aaaaaaaa'

|perl mailsend.pl --to kai.fu --subject

'you subject'

--attach awstats.gz --attach test.pl

mime::lite 引數採用「引數名=>值」對形式。

mime::lite 頭

mime::lite 引數型別

data fh readnow

datestamp filename top

disposition id type

encoding length

filename path

常用附件編碼型別

perl安裝模組

1.cpan perl mcpan e shell o conf init 可以初始化cpan vi usr lib perl5 5.8.8 cpan config.pm 更改cpan配置主要是映象的配置 163映象 urllist q install net netmask 就自動安裝了 m 正則...

perl 簡單學習,安裝perl模組

檢查是否安裝了某個perl模組 有多種方式 0.perldoc perlinstall 列出所有的模組及版本號 1.perl m模組名 e 1 模組名不加空格 沒有返回值則說明有此模組 2.perl e use dbd oracle print dbd oracle version n window...

安裝perl模組 Linux

介紹一下各種平台下perl模組的安裝方法。以安裝dbi模組為例。linux unix下的安裝方法 a 手工安裝的步驟 生成makefile perl makefile.pl 建立模組 make 測試模組 make test 如果測試結果報告 all test ok 您就可以放心地安裝編譯好的模組了。...