Bonjour, voici mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
if ($ERROR==1) {
        $logger->error("Problème BDD");
        return $ERROR;
    }
    else {
	    open(CSV,">$csvFile");
	    while (@data = $sth->fetchrow_array()) {
	     foreach (@data) { 
				if ($i == 0 ) {}
				else { print CSV "$_;"; }
				$i = $i + 1;
	    	}
	    }
	    print CSV "\n";
	    my $val = "";
		foreach my $ch (@Param_RPE_DEV::NOEUDChamps) { 
			$val = $val . $ch . ", ";
		}
Je veux juste faire un print de quelques champs de la table en entete de mon fichier CSV. comment faire?

Merci d'avance.