▼変更対象の変数
401行目 my (
%tm, %mail, %max_day, %max_down, %dlmail);
461行目 my (
$tm, $user, $path, $e_pass, $permit, $l_size, $mail,$max_day,$max_down,$dlmail) = split(/\,/,$line);
475行目 $rtm =
$tm;
477行目
$tm{"$user"} =
$tm;
525行目 my (
$tm, $user, $path, $e_pass, $permit, $l_size, $mail,$max_day,$max_down) = split(/\,/,$line);
530行目 $rtm =
$tm;
1304行目 my (
$tm, $raw_pass) = split(/\,/);
1306行目 if (
$tm ==
$tm{"$id"} && $raw_pass) {
1814行目 my
$tm = (stat("$dir/$file"))[9];
1815行目 if (
$tm + $life_ * 3600 * 24 < time) {
2208行目 my
$tm = param('tm');
2209行目 my %param = ('mode'=>'admin','login_admin'=>$login_admin,'mode2'=>$mode2,'tm'=>
$tm);
2521行目 my
$tm = param('time');
2522行目
$tm = time if !
$tm;
2524行目 my $kigen = &presenttime(
$tm + $kday * 3600 * 24);
2971行目 my
$tm = param('tm');
2974行目 if ($t ==
$tm) {
2984行目 if (
$tm == $t) {
3022行目 my (
$tm, $user, $path, $pass, $permit, $l_size) = split(/\,/);
3072行目 my (
$tm, $user, $path, $pass, $permit, $l_size,$mail,$mxday,$mxdown) = split(/\,/,$line);
3077行目 if (
$tm eq $in_tm) {
3096行目 $line = qq(
$tm,$e_in_user,$in_path,$in_pass,$in_permit,$in_size,$in_mail,$mxday,$mxdown,\n);
3104行目 my %param = ('mode'=>'admin','login_admin'=>$login_admin,'mode2'=>'send_mail','tm'=>
$tm);
3164行目 my
$tm = (split(/\,/))[0];
3175行目 my
$tm = (split(/,/,$line))[0];
3176行目 if ($in_tm ==
$tm) {
3182行目 $add = 1 if
$tm == $in_tm;
3325行目 my (
$tm, $user, $path, $pass, $permit, $l_size, $mail) = split(/\,/,$line);
3484行目 my (
$tm, $user, $path, $pass, $permit, $l_size, $mail,$auto_del,$max_dl) = split/\,/;
3485行目 if (param("$tm") || param('in_tm') eq
$tm) {
3487行目 $ftm =
$tm;
3790行目 my (@updir_list, %dir_user,
%tm);
3819行目 my (
$tm,$rpass) = split(/\,/);
3862行目 my (
$tm, $user, $path, $pass, $permit, $l_size, $mail) = split/\,/, $_;
3866行目
$tm{"$path"} =
$tm;
3872行目 if (param("$tm") || param('in_tm') eq
$tm) {
3887行目 my ($sec, $min, $hour, $day, $mon, $year) = localtime(
$tm);
3905行目 my %param = ('mode'=>'admin','login_admin'=>$login_admin,'mode2'=>'send_mail','tm'=>
$tm);
3945行目 if (! -e join('/',$access_dir,
$tm . '.cgi')) {
3948行目 open(LOG, join('/',$access_dir,
$tm . '.cgi'));
3962行目 my %param = ('mode'=>'admin','login_admin'=>$login_admin,'sort'=>$sort,'mode2'=>'user','show_log'=>
$tm);
3976行目 my %param = ('mode'=>'admin','login_admin'=>$login_admin,'tm'=>
$tm,'show_pass'=>'1');
4077行目 $com = qq(<span style="color:red"><a href="$script?mode=admin&mode2=user&login_admin=$login_admin&
$tm{"$_"}=) . &url_encode('???W') . qq(#input">) . $dir_user[0] . qq(????W???????/a></span>);
4119行目 my ($ac_user, $ac_time, $ac_host,
$tm) = split(/\,/);
4125行目
$tm .= 'g';
4127行目
$tm .= 't';
4129行目 if (!
$tm) {
4130行目
$tm .= 'a';
4141行目 $param{'show_log'} =
$tm;
4185行目 my (
$tm,$path) = split(/<>/);
4189行目 my ($sec, $min, $hour, $mday, $month, $year, $wday, $yday, $isset) = localtime(
$tm);
4487行目 if (
$tm{"$id"} != $time || $id ne $name) {
4511行目 if ((split(/,/))[0] !=
$tm{"$id"}) {
4560行目 if (
$tm{"$id"} != $time) {
4598行目 my (
$tm,$raw_pass) = split(/,/);
4600行目 if (
$tm ==
$tm{"$id"}) {
4611行目 my (
$tm,$raw_pass) = split(/,/);
4612行目 if (
$tm ==
$tm{"$id"}) {
4614行目 push(@new_raw_pass_list,qq(
$tm,$e_new_raw_pass,\n));
4622行目 push(@new_raw_pass_list,qq(
$tm{"$id"},$e_new_raw_pass,\n));
4740行目 if (
$tm{"$id"} == $time) {
5289行目 my (
$tm, $user, $path, $e_pass, $permit, $l_size) = split(/\,/);
5756行目 my(
$tm) = shift;
5771行目 my($str) = "$tmp_id,$time,$host,
$tm,\n";
5794行目 my $log_path = join('/',$access_dir,
$tm);
5821行目 my
$tm = $_[0];
5822行目
$tm = time if !
$tm;
5823行目 my ($sec, $min, $hour, $mday, $month, $year, $wday, $yday, $isset) = localtime(
$tm);