📄 kill_proc_list.cgi
字号:
#!/usr/local/bin/perl# kill_proc_list.cgi# Send a signal to a list of processrequire './proc-lib.pl';&ReadParse();&switch_acl_uid();$| = 1;&header($text{'kill_title'}, "");print "<hr>\n";foreach $p (split(/\s+/, $in{pidlist})) { print "$text{'pid'} <tt>$p</tt> ... \n"; if (kill($in{signal}, $p)) { print "SIG$in{signal} $text{'kill_sent'}<br>\n"; } else { print "$!<br>\n"; } }print "<p><hr>\n";&footer("index_search.cgi?$in{'args'}", $text{'search_return'});
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -