📄 online.cgi
字号:
sub return_online {
$userlist="<script>parent.list=new Array(";
$tmpcount=0; $i = 0;
@online = &getlinedata;
@online =sort @online;
foreach (@online) {
&readlinedata($_);
if (($mark eq "online")&&($chkusername ne "")) {
if (($chkusername eq $superuser)&&($superhidden)) { next; }
if ($i == 1) {$userlist .=",'$chkusername','$chkusersex','$chkuserlevel','$chkstat'";}
else { $userlist .="'$chkusername','$chkusersex','$chkuserlevel','$chkstat'"; $i=1;}
$tmpcount++; }
}
$userlist .=");parent.count=$tmpcount;parent.write1();</script>";
print "<html><head></head><body>\n";
print qq~$userlist\n~;
print "</body></html>\n";
}⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -