Как получить необработанное сообщение Mail.app в Automator?

Пытаться:

on run {input, parameters}
    set theSource to {}
    tell application "Mail"
        repeat with aMessage in input
            set end of theSource to aMessage's source & return
        end repeat
    end tell

    return theSource as text
end run

Вот некоторый код для действия AppleScript, которое будет выполняться после действия «Получить выбранные почтовые сообщения». Он должен быть помещен в действие: «Запустить AppleScript».

-- This script accepts an input which is a list of message objects from Mail and returns their properties.
-- The properties returned are in the form of an AppleScript properties record.
on run {input, parameters}
    tell application "Mail"
        set output to {}
        repeat with thisMessage in input
            set output to output & (properties of thisMessage)
        end repeat
    end tell
    return output
end run

Я думаю, что этот скрипт является прогрессом, но его действие возвращает список записей AppleScript. Вы хотели бы выбирать и выбирать, какие поля вы хотите в AppleScript, и возвращать все сообщения Mail в виде текста для следующего действия, ваш сценарий Perl должен иметь возможность анализировать обычный текст и не иметь дело с записями AppleScript.

Вы можете использовать AppleScript выше, чтобы просмотреть ключи и значения записи, а затем написать AppleScript, который будет фактически использоваться в вашем готовом рабочем процессе, который выбирает только те поля, которые вам нужны.

-- Kaydell
[email protected]
http://learnbymac.com