<?
if($URL){
// protect against people leaving off http:// (unless host starts with h)
$URL = $URL[0]=="h" ? $URL : "http://$URL";
$fd = fopen($URL, "r") or die("Can't open $URL");
$contents = "";
while(!feof($fd)){
$contents .= fread($fd, 1024);
}
print str_replace(ucfirst($OLDWORD), ucfirst($NEWWORD),
str_replace($OLDWORD, $NEWWORD, $contents));
exit;
}
?>
<HTML>
<HEAD><TITLE>word translator</TITLE></HEAD>
<BODY>
<FORM METHOD="POST">
<TABLE>
<TR>
<TD>URL:</TD>
<TD COLSPAN="3"><INPUT TYPE="TEXT" NAME="URL" SIZE="50"></TD>
</TR>
<TR>
<TD>oldword:</TD>
<TD><INPUT TYPE="OLDWORD" NAME="OLDWORD" SIZE="20" VALUE="snake"></TD>
<TD>newword:</TD>
<TD><INPUT TYPE="NEWWORD" NAME="NEWWORD" SIZE="20" VALUE="sink"></TD>
</TR>
<TR>
<TD COLSPAN="4" ALIGN="RIGHT"><INPUT TYPE="SUBMIT"></TD>
</TR>
</TABLE>
</FORM>
</BODY>
</HTML> |
Products of Aardvarks With Chisels : 
triangle.php