▼変更対象の変数
773行目 my ($mail_title,
$msg, $files);
2128行目 my
$msg;
2138行目
$msg .= $_;
2146行目 &mail($mail_title,
$msg, $send_to, $mail_adr);
2177行目 my ($mbody,
$msg,$send_to);
2181行目
$msg = param('cont');
2182行目
$msg =~ s/&/＆/g;
2183行目
$msg =~ s/"/”/g;
2186行目 &mail($mail_title,
$msg, $send_to, $admin_mail[0]);
2292行目 my ($mbody,
$msg,$send_to,$_msg);
2319行目
$msg = param('cont');
2320行目
$msg =~ s/<br>/\n/g;
2321行目
$msg =~ s/\r//g;
2322行目
$msg =~ s/<([^>]|\n)*>//g;
2323行目
$msg =~ s/</＜/g;
2324行目
$msg =~ s/>/＞/g;
2325行目
$msg =~ s/&/＆/g;
2326行目
$msg =~ s/"/”/g;
2331行目
$msg =~ s/(上記URLの有効期限は)\d{4}\/\d{1,2}\/\d{1,2}\(.{2}\) \d{2}:\d{2}/$1$kigen/;
2333行目
$msg =~ s/(上記URLの有効期限は)\d{4}\/\d{1,2}\/\d{1,2}\(.{2}\) \d{2}:\d{2}.*\n//;
2340行目 $mbody =
$msg;
2600行目 my ($mail_title,
$msg);
2606行目
$msg = <<"EOM";
2622行目
$msg =~ s/<date>/$tm_com/g;
2623行目
$msg =~ s/<title>/$simple_title/g;
2624行目
$msg =~ s/<user>/$id/g;
2625行目
$msg =~ s/<mr>/$mr/g;
2626行目
$msg =~ s/<pass>/$tmp_pass/g;
2627行目
$msg =~ s/<url>/$url/g;
2628行目
$msg =~ s/<dir>/$dir/g;
2629行目 &mail($mail_title,
$msg, $mail{"$id"}, $admin_mail[0]);
2641行目
$msg = <<"EOM";
2657行目
$msg =~ s/<date>/$tm_com/g;
2658行目
$msg =~ s/<user>/$user/g;
2659行目
$msg =~ s/<mr>/$mr/g;
2660行目
$msg =~ s/<url>/$url/g;
2661行目
$msg =~ s/<files>/$files/g;
2662行目
$msg =~ s/<title>/$simple_title/g;
2664行目 &mail($mail_title,
$msg, $_, $admin_mail[0]);
2670行目 my ($mail_title,
$msg, $send_to) = @_;
2671行目 &mail($mail_title,
$msg, $send_to, $admin_mail[0]);
2675行目 my ($mail_title,
$msg, $send_to, $send_from) = @_;
2690行目
$msg =~ s/<br>/\n/g;
2691行目
$msg =~ s/<([^>]|\n)*>//g;
2692行目
$msg =~ s/</＜/g;
2693行目
$msg =~ s/>/＞/g;
2697行目 my $mbody =
$msg;
3871行目 my
$msg = my $col_col = my $active = '';
3886行目
$msg .= qq(<tr$col_col>\n<td style="text-align:right;">$edit_form<input type="submit" name="$tm" value="編集) . ($user_count + 1) . qq(" tabindex="$tindx" /></form></td>\n); $tindx++;
3891行目
$msg .= qq(<td><span style="font-size:80%">$tm_com</span></td>\n);
3895行目
$msg .= qq(<td><table summary="ユーザーとしてログイン"><tr><td><form action="$script" method="post" style="margin:0;padding:0" target="_blank">) . &hidden_param(%param) . qq(<input type="image" src="./img/men.gif" alt="${user}${mr}としてログイン" /></form></td><td>) . &key_color($user,$key) . qq($login</td></tr></table></td>\n);
3899行目
$msg .= qq(<td><table summary="ディレクトリ移動"><tr><td><form action="$script" method="post" style="margin:0;padding:0">) . &hidden_param(%param) . qq(<input type="image" src="./img/dir.gif" alt="${user}${mr}のディレクトリに移動" /></form></td><td>) .&key_color($path,$key) . qq(</td></tr></table></td>\n);
3902行目
$msg .= qq(<td><table summary="ディレクトリ移動"><tr><td><a href="$url" title="${user}${mr}のディレクトリに移動"><span style=""><img border="0" src="./img/dir.gif" alt="${user}${mr}のディレクトリに移動" /></span></a></td><td><a href="$url" title="${user}${mr}のディレクトリに移動">) . &key_color($path,$key) . qq(</a></td></tr></table></td>\n);
3907行目
$msg .= qq(<td><table summary="メール送信"><tr><td><form action="$script" method="post" style="margin:0;padding:0">) . &hidden_param(%param) . qq(<input type="image" src="./img/mail.gif" alt="${user}${mr}にメールを送る" /></form></td><td>) .&key_color($mail,$key) . qq(</td></tr></table></td>\n);
3910行目
$msg .= qq(<td><table summary="メール送信"><tr><td><a href="$url" title="${user}${mr}にメールを送る"><img border="0" src="./img/mail.gif" alt="${user}${mr}にメールを送る" /></a></td><td><a href="$url" title="${user}${mr}にメールを送る">) . &key_color($mail,$key) . qq(</a></td></tr></table></td>\n);
3913行目
$msg .= qq(<td> </td>\n);
3932行目
$msg .= qq(<td align="right"$style>) . $tempsize . " / " . &kiro_byte($lim_size) . "</td>";
3934行目
$msg .= "<td align=\"right\">" . $tempsize . " / 制限なし</td>";
3939行目
$msg .= qq(<td align="center">○</td>\n);
3941行目
$msg .= qq(<td align="center">×</td>\n);
3964行目
$msg .= qq(<td><form action="$script" method="post" style="margin:0;padding:0">) . &hidden_param(%param) . qq(<input type="submit" value=\"$time{"$tm"}\" style="font-size:80%" /></form></td>\n);
3966行目
$msg .= qq(<td><small><a href="$script) . &url_param(%param) . qq(">$time{"$tm"}</a></small></td>);
3968行目
$msg .= qq(<td><small>$host{"$tm"}</small></td>\n);
3970行目
$msg .= qq(<td><small>$time{"$tm"}</small></td><td><small>$host{"$tm"}</small></td>\n);
3992行目
$msg .= qq(<td style="text-align:center;"><div style="color:red">$alarm</div></td>\n);
3993行目
$msg .= qq(</tr>\n);
3994行目 $html .=
$msg;
4519行目 my ($mail_title,
@msg,
$msg);
4525行目
@msg = &read_file('./mail_template/u2a_del.txt');
4526行目
$msg = join('',
@msg);
4528行目
$msg =~ s/<date>/$tm_com/g;
4529行目
$msg =~ s/<title>/$simple_title/g;
4530行目
$msg =~ s/<user>/$id/g;
4531行目
$msg =~ s/<mr>/$mr/g;
4532行目
$msg =~ s/<url>/$url/g;
4534行目 ¬ify($mail_title,
$msg, $_);
4679行目 my ($mail_title,
@msg,
$msg);
4685行目
@msg = &read_file('./mail_template/u2a_mod.txt');
4686行目
$msg = join('',
@msg);
4699行目
$msg =~ s/<date>/$tm_com/g;
4700行目
$msg =~ s/<title>/$simple_title/g;
4701行目
$msg =~ s/<user>/$id/g;
4702行目
$msg =~ s/<mr>/$mr/g;
4703行目
$msg =~ s/<url>/$url/g;
4704行目
$msg =~ s/<change>/$change/g;
4708行目 ¬ify($mail_title,
$msg, $_);
5397行目 my ($mail_title,
@msg,
$msg);
5403行目
@msg = &read_file('./mail_template/u2a_new.txt');
5404行目
$msg = join('',
@msg);
5408行目
$msg =~ s/<date>/$tm_com/g;
5409行目
$msg =~ s/<title>/$simple_title/g;
5410行目
$msg =~ s/<user>/$new_user/g;
5411行目
$msg =~ s/<mr>/$mr/g;
5412行目
$msg =~ s/<url>/$url/g;
5413行目
$msg =~ s/<dir>/$dir/g;
5415行目 ¬ify($mail_title,
$msg, $_);
