Esimerkki tiedostonkäsittelyfunktioista
file_exists -komennolla,
löytyykö tarvitsemaamme tiedostoa... ";
if (!file_exists($tiedosto))
print "Tiedostoa '$tiedosto' ei löytynyt.
\n";
else
{
print "Löytyi!
\n";
print "Tiedoston koko (filesize): "
.filesize($tiedosto)." tavua.
\n";
print "tiedosto on ";
if (is_writeable($tiedosto)) print "kirjoitettavissa
( is_writeable)... ";
if (is_readable($tiedosto)) print "luettavissa
( is_readable)... ";
print "
\n";
$osoitin = fopen($tiedosto,"r+");
print "Avataan tiedosto käyttäen komentoa
fopen ja tulostetaan 2 ensimmäistä
kirjainta tiedostosta fgetc -komennolla. ";
print "Samalla tarkistetaan feof -komennolla,
ettei olla tiedoston lopussa:
\n";
for ($kierros = 1; $kierros<=2; $kierros++)
{
$kirjain = fgetc($osoitin);
if (!feof($osoitin))
print $kirjain;
}
print "
\n";
print "Tulostuuko koko sana, kun seuraavaksi käytetään
fgets -komentoa?
\n";
print fgets($osoitin,7);
print "
\n";
print "Ei. Tarkistetaan ftell -komennolla
ollaanko tiedoston alussa.";
print "
\n".ftell($osoitin)."
\n";
print "Ei olla, joten palataan tiedoston alkuun rewind
-komennon avulla ja yritetään uudelleen:
\n";
rewind($osoitin);
print fgets($osoitin,7);
print "
\n";
print "Luetaan tiedosto taulukkoon
file -komennolla...
\n";
$teksti = file($tiedosto);
print "Tulostetaan kolme riviä taulukosta:
\n";
for ($h = 0; $h <= 2; $h++)
{
print $teksti[$h]."
\n";
}
print"
Suljetaan tiedosto(fclose).";
fclose($osoitin);
print "
\nTiedosto on luotu (filectime): ";
print date("l dS of F Y H:i:s",filectime($tiedosto))."
\n";
print "Tiedostoon on viimeksi kirjoitettu (filemtime): ";
print date("l dS of F Y H:i:s",filemtime($tiedosto))."
\n";
}
?>