Chinaunix首页 | 论坛 | 博客
  • 博客访问: 30672
  • 博文数量: 5
  • 博客积分: 10
  • 博客等级: 民兵
  • 技术积分: 18
  • 用 户 组: 普通用户
  • 注册时间: 2012-10-18 13:29
个人简介

cd都无法改变,就会尝试用rm -rf去摧毁!

文章分类
文章存档

2014年(1)

2013年(4)

分类: LINUX

2013-03-27 09:22:19

可以。用户登录时,Bash 首先执行全局登录脚本(由 root 建立) /etc/profile,然后在用户起始目录下依次寻找 .bash_profile、.bash_login、.profile 三个文件,执行最先找到的一个。可以用这种办法像 Netware 一样为不同的用户定制运行环境。
此外,用户退出登录时还可以运行 .bash_logout 脚本。

如:/root/.bash_profile
下加了一段脚本
`/usr/bin/perl /perl/login.pl`
[追加]
#!/usr/bin/perl
use strict;
my $user=`whoami`;
use Net::SMTP;
my $ipaddress;
my $time;
open(FH,"w|");
foreach my $data (){
   if(!($data=~/days/)){
         if(!($data=~/USER/)){
         my(@arr)=split " ",$data;
          if($user==$arr[0]){
                  $ipaddress=$arr[2];
                  $time=$arr[3];
           }
           }
    }
}
close FH;
my $mailhost='127.0.0.1';
        my $mailfrom='';
        my $mailto='';
        my $subject="Who login!";
        my $smtp = Net::SMTP->new($mailhost,Hello =>"localhost",Timeout => 30,Debug => 0,);
                $smtp->mail($mailfrom);
                $smtp->to($mailto);
                $smtp->data();
                $smtp->datasend("To: $mailto\n");
                $smtp->datasend("From: $mailfrom\n");
                $smtp->datasend("Subject: $subject\n");
                $smtp->datasend("\n");
                $smtp->datasend("$user\t$ipaddress\t$time\n");
                $smtp->dataend();
        $smtp->quit;
这样的话,只要用户以root身份登录就可以把邮件发送过来了。。。

本文出自 “坏男孩” 博客,请务必保留此出处http://5ydycm.blog.51cto.com/115934/124378

阅读(2241) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~