Всем здарова!   По рекомендациям опытных начал изучение Perl по книге Р. Шварца и Т. Кристиансена "Изучаем Perl", но на определённом этапе освоения материала начались сложности. Программа почему то работает не корректно, хотя код в точности совпадает скнижным вариантом, а также были выполнены все пункты по размещению файлов секретных слов с расширением *.secret в рабочем каталоге. Там же были размещены файлы для записи базы данных lastdb.dir и lastdb.pag. Вот код программы:

А вот сведения об ошибках, выдаваемых интепретатором Perl:

Так как, пока нехватает опыта самостоятельно решить подобные задачи, обращаюсь за помощью для устранения представленных ошибок.
Заранее благодарен!  

если скрипт маленький, варнинги можно не включать

Хорошо удалил ключ -w , но программа опять же выполняется некорректно:

Хотя введённое имя соответствует секретному слову. Похоже здесь уже прдупреждение выводит командная строка.  

      open MAIL, "| mail YOUR_ADDRESS_HERE"; - ну вот эта штука не для винды) перенаправьте просто в файл
хотя может и есть какие нибудь консольные дискриптовые отсыльщики, но у вас ясно они не стоят(

Это сообщение отредактировал(а) DaemonSuw - 15.7.2009, 17:48

А где можно почерпнуть информацию о файловых отсыльщиках для винды и об их установке.

Vldmir, ищи sendmail for windows

Спасибо, будем действовать!  

Vldmir, да вы бы не мучались с администрирование винды, а писали бы просто в файл:



MAIL - это дескриптор файла...
print MAIL '' - печать в этот дескриптор, то есть по сути в файл...
close - закрытие файла и сохранение данных
с mail в примере будет тоже самое только с помощью внешней утилиты mail, которая в качестве аргументов получает е-майл и тело письма, если я правильно понял пример... 

DaemonSuw, cпасибо за совет. В случае использования приведённого выше кода, ясно программа отправляет сообщение в файл при набранном неправильном секретном слове, или если срок со времени создания секретного слова превысил 7 дней. 
 Но что касается отправки сообщения на адрес электронной почты при помощи SendMail, здесь похоже помимо установки самого SendMail, необходима установка веб-сервера.   
 Да, и ещё вопросик при выполнении кода программы:

 когда введено имя и соответствующее ему секретное слово, программа выводит опять тот же запрос:

и понятно посылает сообщение в файл, хотя время созданных файлов секретных слов не привышает 7 дней.
Например, если ввести используемое по умолчанию для всех имён секретное слово "groucho" 
прграмма завершается удачно.

Я тож изучаю пэрл по этой книжке, там много неточностей, приходилось подгонять под винду либо пробовать под линукс, но на линуксе проктически 50% всех ошибок, теже что и на винде. Я так думаю, что книжка врод писалась 1998 году, а с тех пор много времени прошло, да и та самая винда изменилась (хотя наверн пэрл не был расчитан на 98 винду, а ток на линуксы). Так что эта книжка хорошэнько тренерует мозги...

почему?

shamber, поправлюсь, я хотел лишь упомянуть, что сервер можно использовать как один из вариантов проверки удачной отправки почты, применяя Perl-скрипт. Например, в дистрибутив Denver'а входит sendmail для проверки отправки почтовых сообщений. Но также не исключаю, что для выполнения подобной задачи можно применить ряд специальных модулей . 

Это сообщение отредактировал(а) Vldmir - 21.7.2009, 20:37

На самом деле не sendmail, а заглушка, которая пишет в файл. Во всяком случае, так было года два назад)

Это сообщение отредактировал(а) KSURi - 21.7.2009, 23:26

 Если я вас правильно понял, то принцип использования sendmail на Denver'е, аналогичен принципу отправки сообщения из Perl- скрипта в файл? 

да

Добавлено через 38 секунд
хотите посылать почту смотрите на smtp.