Всем привет, это логическое продолжение моей второй статьи, так что если вы его не читали, обязательно прочтите. У нас одна задача, отправить 1.txt на наш gmail.(Прочтите прошлую статью если не понимаете о чём я) Итак, начнёмбус: Импортируем нужные модули import os import smtplib import time from email import encoders from email.mime.base import MIMEBase from email.mime.text import MIMEText from email.mime.multipart import MIMEMultipart Теперь работаем над созданием подключения к smtp и привязкой...

Для работы с почтой в Perl можно использовать модуль Email::Sender. Пример отправки простого текстового письма: use Email::Sender::Simple qw(sendmail); use Email::Simple; use Email::Simple::Creator; my $to = 'recipient@example.com'; my $from = 'sender@example.com'; my $subject = 'Test Email'; my $body = 'Hello World!'; my $email = Email::Simple->create( header => [ To => $to, From => $from, Subject => $subject, ], body => $body, ); sendmail($email); Пример отправки письма с вложением: use Email::Sender::Simple qw(sendmail); use Email::MIME; my $to = 'recipient@example...