摘要:
1 #!/usr/bin/perl -w 2 use strict; 3 use warnings; 4 use DBI; 5 6 #### 7 # 这里进行服务器任务管理 8 ## 9 #字符串映射函数 10 our %actions = ( 11 "check" => \&pcheck, 12 "run" => \&prun, 13 "run_nohup" => \&run_nohup, 14 "kill" => \&pkill 15 ); 16 our 阅读全文