Code source du fichier voirextrait.php

<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">

<?php
    $page = "https://www.data.gouv.fr/fr/datasets/donnees-relatives-aux-personnes-vaccinees-contre-la-covid-19-1";

    // ouvrir le fichier contenant l'url à analyser
    $descfic = fopen ($page, "r");

    // si l'ouverture s'est bien passée
    if ($descfic)
    {
        // on se limitera au 27 premiers fichiers indiqués
        $compteur = 0;

        // lire la première ligne de l'url à analyser
        $ligne = fgets ($descfic, 200);

        // tant qu'on n'a pas fini l'analyse
        while ($ligne && $compteur < 27)
        {
            // supprimer les espace en début de ligne et le \n à la fin
            $ligne = trim ($ligne);

            // si la ligne lue commence par vacsi et se termine par .csv
            if (substr ($ligne, strlen ($ligne) - 4) == ".csv" &&
                substr ($ligne, 0, 5) == "vacsi")
            {
                // une référence de fichier de plus à traiter
                $compteur ++;

                // afficher la ligne lue
                echo $ligne."<br>\n";

                // chercher dans les lignes suivantes celle qui contient "/static.data"
                do
                    $ligne = fgets ($descfic, 400);
                while (strpos ($ligne, "/static.data") == 0);

                // extraire l'url de cette ligne
                $ligne = substr ($ligne, strpos ($ligne, ">https") + 1);
                $ligne = substr ($ligne, 0, strpos ($ligne, "</a>"));

                // l'afficher
                echo $ligne."<br>\n";

                // chercher dans les lignes suivantes celle qui contient "datasets"
                do
                    $ligne = fgets ($descfic, 200);
                while (strpos ($ligne, "datasets") == 0);

                // extraire l'url de cette ligne
                $ligne = substr ($ligne, strpos ($ligne, ">https") + 1);
                $ligne = substr ($ligne, 0, strpos ($ligne, "</a>"));

                // l'afficher
                echo $ligne."<br><br>\n";
            }

            // passer à la ligne suivante de l'url à analyser
            $ligne = fgets ($descfic, 200);
        }

        // terminé avec le fichier à lire
        fclose ($descfic);
    }
    // sinon message d'erreur
    else
        echo "Page ".$ficpage." manquante";
?>