Программирование на языке Ruby

  head << 'X-ruby-talk: #$1
'
 end
 head << line
end
head << '#{Params::LOOP_FLAG}
'
body = ''
while line = gets
 body << line
end
msg = head + '
' + body
msg.gsub!(/
?
/, '
')
nntp = NNTPIO.new(Params::NEWS_SERVER)
raise 'Failed to connect' unless nntp.connect
nntp.post(msg)

Листинг 18.7. Перенаправление конференции в почту

##
# Простой сценарий для зеркалирования трафика
# из конференции comp.lang.ruby в список рассылки ruby-talk.
#
# Вызывается периодически (скажем, каждые 20 минут).
# Запрашивает у новостного сервера все сообщения с номером,
# большим номера последнего сообщения, полученного
# в прошлый раз. Если таковые есть, то читает сообщения,
# отправляет их в список рассылки и запоминает номер последнего.
require 'nntp'
require 'net/smtp'
require 'params'
include NNTP
##

# # Отправить сообщения в список рассылки. Сообщение должно

# быть отправлено участником списка, хотя в строке From:
# может стоять любой допустимый адрес.
#
def send_mail(head, body)
 smtp = Net::SMTP.new
 smtp.start(Params::SMTP_SERVER)
 smtp.ready(Params::MAIL_SENDER, Params::MAILING_LIST) do |a|
  a.write head
  a.write '#{Params::LOOP_FLAG}
'
  a.write '
'
  a.write body
 end
end
##
# Запоминаем идентификатор последнего прочитанного из конференции
# сообщения.
begin
 last_news = File.open(Params::LAST_NEWS_FILE) {|f| f.read}.to_i
rescue
 last_news = nil
end
##
# Соединяемся с новостным сервером и получаем номера сообщений
# из конференции comp.lang.ruby.
#
nntp = NNTPIО.new(Params::NEWS_SERVER)
raise 'Failed to connect' unless nntp.connect
count, first, last = nntp.set_group(Params::NEWSGROUP)
##
# Если номер последнего сообщения не был запомнен раньше,
# сделаем это сейчас.
if not last_news
 last_news = last
end
##
# Перейти к последнему прочитанному ранее сообщению
# и попытаться получить следующие за ним. Это может привести
# к исключению, если сообщения с указанным номером
# не существует, но мы не обращаем на это внимания.
begin
 nntp.set_stat(last_news)
rescue
end
##
# Читаем все имеющиеся сообщения и отправляем каждое
# в список рассылки.
new_last = last_news
begin
 loop do
  nntp.set_next
  head = ''
  body = ''
  new_last, = nntp.get_head do |line|
   head << line