perl从/etc/passwd找出udi>500的用户
来源:互联网 发布:c语言定义常量 编辑:程序博客网 时间:2024/05/16 06:57
用perl从/etc/passwd找出udi>500的用户
cat pw.pl
#!/usr/bin/perl
$passwd="/etc/passwd";
open(PW,$passwd) || die "can't open $paswd:$!/n";
while (<PW>) {
($name,$passwd,$uid,$gid,$gcos,$dir,$shell)=split(/:/);
printf "$name/n" if($uid>500);
}
close(PW);
##########################################3
另一种方法利用了正则表达式强大的搜索功能
#!/usr/bin/perl
use strict;
open (FILE,"/etc/passwd");
while(<FILE>) {
if(/x:(/d+)/) {
printf "$1 /n" if ($1 > 500) && (/(/w+):x/) ;
}
}
close(FILE);
- perl从/etc/passwd找出udi>500的用户
- linux /etc/passwd,/etc/shadow用户文件的说明
- /etc/passwd的格式
- 对linux用户管理中/etc/passwd文件的理解
- process credentials相关的用户空间文件(/etc/passwd /etc/shadow /etc/group )
- 关于用户不在/etc/passwd中的问题
- /etc/passwd 的格式介绍
- /etc/passwd的文件结构
- linux的 /etc/passwd文件
- 用户配置文件/etc/passwd和密码配置文件/etc/shadow详解
- /etc/passwd
- /etc/passwd
- /etc/passwd
- /etc/passwd
- /etc/passwd
- /etc/passwd /etc/group /etc/shadow 文件的格式说明
- /etc/passwd /etc/group /etc/shadow 文件的格式说明
- rh as3默认安装/etc/passwd中哪些用户是多余的?
- asp.net中的弹出对话框
- arm+linux平台开发的准备(转)
- 初窥NetBeans 5.5
- 梨
- 什么是SCI,SSCI CSSCI
- perl从/etc/passwd找出udi>500的用户
- perl 实现日志抓错功能
- perl版ping源码
- 用perl实现两数的置换
- 有关java私有变量访问的一个问题!!
- 关于O型血狮子新生活开始的宣言
- ASP.NET弹出对话框(总结)
- ObjectARX 足球算法
- 一些世界上著名杀软的专杀工具下载地址