※機能制限した見本版です。(このディレクトリから移動できません。置換ファイルはphpではなく、txtファイルになります。ファイルや置換パターンを編集しても10分で元に戻ります。)
ファイル一覧を隠す
上のディレクトリへ上のディレクトリへ
ファイルcalendar.cgi
ファイルmultiupload.cgi
サブディレクトリsubdir
 multiupload.cgiを選択中
SJIS EUC-JP UTF-8 JIS 
--------------------------------------------------------------------------------------------------
■以下の変数名はスカラーや配列で重複して使用されています。変数のタイプが違う場合、別名に変更してください。
一括で変換
変数名スカラー配列ハッシュ 
history historyを編集
admin_mail admin_mailを編集
ver verを編集
access accessを編集
pathpathを編集
mode modeを編集
subdir subdirを編集
sort sortを編集
pass passを編集
user userを編集
dir dirを編集
param paramを編集
mailmailを編集
size sizeを編集
decode_name decode_nameを編集
perm permを編集
download downloadを編集
tm tmを編集
tmp tmpを編集
value valueを編集
val valを編集
oval ovalを編集
time timeを編集
kigen kigenを編集
html htmlを編集
raw_pass raw_passを編集
msg msgを編集
url urlを編集
t tを編集
rpass rpassを編集
htac htacを編集
del_htac del_htacを編集
d dを編集
new_raw_pass new_raw_passを編集
dlmail dlmailを編集
max_day max_dayを編集
max_down max_downを編集
new_user new_userの編集をキャンセル
str strを編集
salt saltを編集
host hostを編集
cookcookを編集
dir_user dir_userを編集

$new_user → $
@new_user → @
▼変更対象の変数
3008行目  my @new_user = ();
3124行目  push(@new_user,$line);
3139行目  push(@new_user,$line);
3159行目  print USR @new_user;
3163行目  foreach (@new_user) {
3324行目  foreach my $line (@new_user) {
4481行目  my @new_user = ();
4488行目  push(@new_user,$_);
4500行目  print USR @new_user;
4554行目  my @new_user = ();
4561行目  push(@new_user,$_);
4670行目  push(@new_user,qq($time,$name,$dir,$epass,$perm,$size,$email,$max_day,$max_down,$dlmail,\n));
4674行目  print USR @new_user;
5406行目  my $new_user = param('new_id');
perlからPHPへの書き換え補助 perl2php.php ver.1.2