Perl Mail::Sender를 이용해 간단 알람 메일 전송하기

사용자 삽입 이미지
위와 같은 상황의 시스템이 있다고 가정해 봅시다. 말하고 싶은것은 알람메일을 전송하는 서버가 메일서버가 아니고 mail과 관련한 그 어떤것도 없다고 할때 알람 메일을 어떻게 보낼 수 있을까요?

간단하게 사용할 수 있는 Perl 라이브러리로 Mail::Sender가 있습니다. 어떻게 사용하는지 볼까요?

우선 설치부터 해보겠습니다. 요즘 Perl은 많이 발전해서 CPAN이라는 놈으로 매우 쉽게 새로운 모듈을 설치할 수 있습니다.
[code][root@Theeye /]# perl -MCPAN -e ‘install Mail::Sender'[/code]

이제 준비가 끝났습니다. 스크립트를 작성해 봅시다.
[code][root@Theeye /]# vi sender[/code]
[code]#!/usr/bin/perl


use Mail::Sender;


eval {
        $sender = new Mail::Sender {
                        from => ‘Theeye < This entry was posted in 리눅스서버관리 and tagged , , , , , , on by .