astro.php

<?
# Free script by fradeff, 08.2003 
# extract datas from an url, parse it under conditions
# use fgets instead of read (better for ending lines and ereg)

$ladate=date("Y m d");
echo "<span class=mot>Aujourd'hui: $ladate (enlever 5h, heure canadienne)</span><br>";
#exit;
$fp = fopen("http://www2.globetrotter.net/faaq/ephemerides/ephemois.htm", "r");
if ($fp) {
$counter=0;
  while (!feof($fp)) {
   $t = fgets($fp, 4096);
if (ereg("^200[3-9] [0-9][0-9] [0-9][0-9]  [0-9][0-9]:[0-9][0-9] ", $t)) {
$ladate2=substr($t, 0, 11);
if ($ladate2>=$ladate) {
if ($counter<10) {
$dateevnmt=substr($t, 8,2);
$temps=substr($t, 12,2);
 $text.="$t<br>\n";
$counter++;
}
}
}
}
}
echo $text;
fclose($fp);
?>