perlからPHPへの書き換え補助

※機能制限した見本版です。(このディレクトリから移動できません。置換ファイルはphpではなく、txtファイルになります。ファイルや置換パターンを編集しても10分で元に戻ります。)

	上のディレクトリへ
	calendar.cgi
	multiupload.cgi
	subdir

calendar.cgiを選択中

SJIS EUC-JP UTF-8 JIS

--------------------------------------------------------------------------------------------------

■以下の変数名はスカラーや配列で重複して使用されています。変数のタイプが違う場合、別名に変更してください。

一括で変換

変数名	スカラー	配列	ハッシュ
history	●	●		historyを編集
ver	●	●		verを編集
file	●	●		fileを編集
tmp	●	●		tmpを編集
val	●	●		valを編集
memo	●	●		memoを編集
m	●	●		mを編集
wh	●	●		whを編集
str	●	●		strを編集
category	●	●		categoryを編集
w	●	●		wを編集
cont	●	●		contを編集
cook	●	●		cookの編集をキャンセル
param		●	●	paramを編集

▼変更対象の変数

1676行目 local(@cook) = @_;
1677行目 local($gmt, $cook, @t, @m, @w);
1689行目 foreach (@cook) {
1691行目 $cook .= "$_<>";
1695行目 print "Set-Cookie: CALENDAR=$cook; expires=$gmt\n";
1705行目 $cook = $ENV['HTTP_COOKIE'];
1708行目 foreach ( split(/;/, $cook) ) {
1711行目 $cook[$key] = $val;
1715行目 foreach ( split(/<>/, $cook['CALENDAR']) ) {
1718行目 push(@cook,$_);
1720行目 return (@cook);