|
<?
$subject = str_replace("\\\\n", chr(13), $subject );
$subject = str_replace("\\\\t", chr(9), $subject );
$pattern = str_replace("\\\\", "\\", $pattern );
$replace = str_replace("\\\\", "\\", $replace );
if ( $subject != "" ) {
$result = preg_replace( $pattern, $replace, $subject );
$subject = str_replace( chr(13),"\\n", $subject );
$subject = str_replace( chr(9), "\\t", $subject );
}
?>
<FORM>
<INPUT type=submit value="送信">
<TABLE cellpadding=5>
<TR>
<TD>置換前</TD>
<TD><INPUT type=text name=subject value="<?=$subject?>" size=60></TD>
<TD><?= str_replace(" ", "_", $subject ) ?> </TD>
</TR>
<TR>
<TD>パターン</TD>
<TD><INPUT type=text name=pattern value="<?=$pattern?>" size=60></TD>
<TD><?= $pattern ?> </TD>
</TR>
<TR>
<TD>置換文字列</TD>
<TD><INPUT type=text name=replace value="<?=$replace?>" size=60></TD>
<TD><?= str_replace(" ", "_", $replace ) ?> </TD>
</TR>
<TR>
<TD>結果</TD><TD colspan=2><?= str_replace(" ", "_", $result ) ?></TD>
</TR>
</TABLE>
</FORM>
| |