※機能制限した見本版です。(このディレクトリから移動できません。置換ファイルは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_raw_pass → $
@new_raw_pass → @
▼変更対象の変数
3172行目  my @new_raw_pass = ();
3181行目  push(@new_raw_pass,$line); # user.cgiに登録が無いものは削除
3188行目  push(@new_raw_pass,$line);
3190行目  @raw_pass = @new_raw_pass;
4608行目  my $new_raw_pass = param('new_pass');
4609行目  $epass = &encrypt($new_raw_pass);
4613行目  my $e_new_raw_pass = &change($new_raw_pass);
4621行目  my $e_new_raw_pass = &change($new_raw_pass);
5367行目  my $new_raw_pass = join(',',$time,$e_new_raw_pass) . ',';
5370行目  print RAW $new_raw_pass . "\n";
perlからPHPへの書き換え補助 perl2php.php ver.1.2