标签： perl email header
我想知道是否有任何可能的方法来生成sha1邮件头消息ID。 在下面的命令中，我使用Perl模块“Email :: MessageID”。
命令：
perl -MEmail :: MessageID -e'my $ mid = Email :: MessageID-＆gt; new-＆gt; in_brackets; print“Message-ID：$ mid \ x0A \ x0D”;'
输出：
消息ID：＆lt; 1349305411.bDf18ac0.3235@gate>