uawdijnntqw1x1x1
IP : 216.73.216.137
Hostname : xhost1.intravision.ru
Kernel : Linux xhost1.intravision.ru 3.16.0-7-amd64 #1 SMP Debian 3.16.59-1 (2018-10-03) x86_64
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,
OS : Linux
PATH:
/
var
/
lib
/
ucf
/
..
/
python
/
..
/
apache2
/
..
/
python-support
/
..
/
..
/
share
/
python
/
..
/
webmin
/
at
/
delete_jobs.cgi
/
/
#!/usr/bin/perl # Delete multiple at jobs use strict; use warnings; our(%access, %text, %in); require './at-lib.pl'; &ReadParse(); &error_setup($text{'deletes_err'}); my @d = split(/\0/, $in{'d'}); @d || &error($text{'deletes_enone'}); # Delete each one my @jobs = &list_atjobs(); foreach my $d (@d) { my ($job) = grep { $_->{'id'} eq $d } @jobs; $job || &error($text{'delete_egone'}); &can_edit_user(\%access, $job->{'user'}) || &error($text{'edit_ecannot'}); &delete_atjob($job->{'id'}); } &webmin_log("delete", "jobs", scalar(@d)); &redirect("");
/var/lib/ucf/../python/../apache2/../python-support/../../share/python/../webmin/at/delete_jobs.cgi