Erzeugt die Datei hist.inc
php Beginn des Programms
$arr = array();
Schleife durch alle inc-Dateien im Verzeichnis heilige
$files = glob('heilige/*.inc');
foreach($files as $file) {
include $file;
$arr1 = array();
$geb1 = $Geburtstag;
if (strpos($geb1,'.')>0) $geb1=substr($Geburtstag,-4);
$arr1[0] = $jh;;
$arr1[1] = $geb1;
$tod1 = $Todestag;
if (strpos($tod1,'.')>0) $tod1=substr($Todestag,-4);
if (substr($tod1,0,1)==".") $tod1=substr($tod1,1);
$arr1[2] = $geb1 . " - " . $tod1;
$arr1[3] = $Titel;
$arr1[4] = substr($file,8);
$arr1[5]= floor($arr1[0]/100)+1;
$arr1[5] = $jh;
$arr1[6] = $mw;
$arr1[7] = $amt[0];
$arr1[8] = $orte[0];
$arr1[9] = $unvershert;
$arr1[10] = $stigmata;
Dann werden die Daten aus der Datei an das Array angehängt
array_push($arr,$arr1);
}
Dann wird das Array sortiert
sort($arr);
Die sortierten Daten werden dann in die Datei hist.inc geschrieben
$datei = fopen("hist.inc","w");
fputs($datei,'<' . '?php' . "\n");
fputs($datei,'$' . "heilige1 = array (\n");
fputs($datei,'//' . " Spalte 0 Nur für die Sortierung (wird nicht dargestellt)\n");
fputs($datei,'//' . " Spalte 1 Sortierung (Wert der dargestellt wird)\n");
fputs($datei,'//' . " Spalte 2 Zeitraum\n");
fputs($datei,'//' . " Spalte 3 Heiliger Name\n");
fputs($datei,'//' . " Spalte 4 Dateiname\n");
fputs($datei,'//' . " Spalte 5 Jahrhundert\n");
fputs($datei,'//' . " Spalte 6 Man/Frau\n");
fputs($datei,'//' . " Spalte 7 Amt\n");
fputs($datei,'//' . " Spalte 8 Ort\n");
fputs($datei,'//' . " Spalte 9 Unvers\n");
fputs($datei,'//' . " Spalte 10 Stigmata\n");
Schleife durch das neue Array
for ($a=0;$a
$arr1=$arr[$a];
if ($arr1[0]=="???") break;
fputs($datei,"array (");
fputs($datei,$arr1[0]); // jh
fputs($datei,",\"");
fputs($datei,$arr1[1]); // geb1
fputs($datei,"\",\"");
fputs($datei,$arr1[2]); // geb1 - tod1
fputs($datei,"\",\"");
fputs($datei,$arr1[3]); // Titel
fputs($datei,"\",\"");
fputs($datei,$arr1[4]); // Dateiname
fputs($datei,"\",");
fputs($datei,$arr1[5]); // jh
fputs($datei,",");
fputs($datei,$arr1[6]); // mw
fputs($datei,",\"");
fputs($datei,$arr1[7]); // amt
fputs($datei,"\",\"");
fputs($datei,$arr1[8]); // ort
fputs($datei,"\",");
fputs($datei,$arr1[9]); // unvers
fputs($datei,",");
fputs($datei,$arr1[10]); // stigmata
fputs($datei,"),\n");
}
fputs($datei,");\n");
fputs($datei,'?' . '>' . "\n");
fclose($datei);
< html >
< body >
fertig
< /body >
< /html >