AIX下，得到用户上次更改密码时间的脚本（原创）

    看了这个帖子：http://www.loveunix.net/bbs/index.php?showtopic=42654，于是决定自己写了个得到用户上次更改密码时间的脚本。第一次用PERL写脚本，所以花的时间不短，但是从中学到很多东西，很是欣慰。

脚本如下：
#!/usr/bin/perl
# script name: lastupdate
# function: get the last password update time of some aclearcase/" target="_blank" >ccount in AIX
# usage: lastupdate USERNAME
# author: beginner@yeah.net http://blog.chinaunix.net/index.php?blogId=739
if ($ARGV[0]) {
print "The corrent time is:ttt";
#system (date);
print scalar localtime(time);
print "n";
$lastup=`cat /etc/security/passwd |grep -p $ARGV[0] |grep lastup |awk '{print }'`;
print "The last update time of $ARGV[0] is:t";
print scalar localtime($lastup);
print "n";
} else {
print " usage: [path] lastupdate USERNAMEn";
}

脚本名叫lastupdate，chmod +x lastupdate之后就可以用了。

实验结果如下：
mycomputer#> ./lastupdate root
The corrent time is:                        Thu Jan 27 10:58:24  2005
The last update time of root is:        Mon Dec 27 08:30:11 2004
mycomputer#>

补充说明：由于网页的原因，脚本中print语句的“＼t”和“＼n”（红字表示）被自动替换成了“t”和“n”，这可能是BLOG的BUG。