使用Applescript将邮件内容添加到Excel

我已经阅读并使用了一些很棒的代码表单，这些表单使用Applescript将内容从邮件添加到Excel。我快到了，但还有一个问题

我有一封电子邮件的如下布局

From:xxxxxx
性别：xxxxxx
年龄：>18-24岁
电话日期：xxxxxx
流动电话：
地址：xxxxx
xxxxx
xxxx
xxxx

最终工作代码如下所示

--APPLESCRIPT
_main（）
关于_main（）
将mm设置为{}
告诉应用程序“邮件”
以米为单位重复（获取选择）
将mm的端点设置为m的内容和换行
结束重复
结束语
将r设置为my_retrieve_数据（mm）
执行shell脚本“printf'%s'”&r的引用表单&“>~/desktop/$（日期+列表\u%F\u%H%M%s.csv）”
返回r
尾水管
on_检索_数据（mm）
(*
列表mm：消息文本列表
*)
脚本o
属性pp:mm
属性qq:{}
属性rr:{}
属性边界：执行shell脚本“uuidgen”而不更改行结尾--UUID&LF
属性批：50—一次要处理的消息数；组合文本不得超过约200K
--将消息分成若干批
重复从1开始的步骤，按批次计算我的pp
将j设置为i+批次-1
如果j>（计算我的pp），则将j设置为-1
将我的qq结尾设置为我的pp项目i到j
结束重复
--检索每批数据
在我的qq里用q重复
将我的rr的end设置为do shell脚本“perl-CSDA-w