";
$fp = fopen ($filename, "w") or die("Couldn't open $filename");
fwrite($fp, "Hello World\n");
fclose($fp);
print "Appending to $filename
";
$fp = fopen ($filename, "a") or die("Couldn't open $filename");
fputs($fp, "And another thing\n");
fclose($fp);
?>