有没有办法让Octave自动发送电子邮件？

# 加载SMTP包
pkg load smtp

# 设置SMTP服务器的参数
server = "smtp.example.com";
port = 587;
username = "your_username";
password = "your_password";

# 建立与SMTP服务器的连接
conn = smtp_connect(server, port, "tls");
if !conn
  error("无法连接到SMTP服务器");
endif

# 登录SMTP服务器
if !smtp_login(conn, username, password)
  error("无法登录SMTP服务器");
endif

# 设置发件人、收件人、主题和正文
from = "sender@example.com";
to = "recipient@example.com";
subject = "这是一封测试邮件";
body = "这是一封通过Octave自动发送的测试邮件。";

# 发送邮件
if !smtp_send(conn, from, to, subject, body)
  error("无法发送邮件");
endif

# 断开与SMTP服务器的连接
smtp_disconnect(conn);