2010-08-12
perl ping检测脚本
我的第一个用于生产环境的perl脚本,虽然不是很优秀,但也迈出了扎实的一步 :) 领导有任务,给一批IP列表,ping每一台机器,如果没有响应就发邮件通知,通知的邮件需要分开,不能通知一个列表,得一封...
我的第一个用于生产环境的perl脚本,虽然不是很优秀,但也迈出了扎实的一步 :) 领导有任务,给一批IP列表,ping每一台机器,如果没有响应就发邮件通知,通知的邮件需要分开,不能通知一个列表,得一封...
CWD – change working directory 更改目录 DELE – delete a remote file 删除文件 LIST – list remote files 列目录 MK...
cd /usr/local/directadmin/scripts ./getLicense.sh 你的client_ID 新的DA_License 新IP service directadmin r...
1加2加3加4 … 加到100,试了一下还是perl最快 需要用到perl的List::Util模块. [root@centos perl]# more plus.pl #!/usr/bi...
centos上配置vpn并指定出口IP 添加centos的源 /etc/yum.repos.d/CentOS-Base.repo [doylenet] name=Doylenet custom rep...
近期评论