Zápis proměnné do souboru + její zobrazení v těle

<?
$filename = $uloz.$csv."data.csv";
 if (File_Exists($filename)):
        $fp = FOpen($filename, "a");
        if (!$fp)  return;
        ;
    else: 
        umask(0131);
        $fp = FOpen($filename, "w");
        $textX = "EMAIL; JMENO; ADRESA;
";
        FPutS($fp, $textX);
        if (!$fp) return;
    endif;
$ulozfinal = "$email; $jmeno; $adresa;
";

    FPutS($fp, $ulozfinal);
    FClose($fp);

?>

...

<?
 if ((!IsSet($email))||(!IsSet($jmeno))||(!IsSet($adresa)){ 
}
echo"
Zadali jste tyto údaje:<BR>
Email:$email<BR>
Jméno:$jmeno<BR>
Adresa:$adresa<BR>
?>