Savoir si une requete existe

Bonjour,

J'aurai besoin d'un petit renseignement
Je fais des requetes sur une table et il se peut que parfois, cette derniere ne trouve aucun enregistrement

Code:

---

1 2 3 4 5 6 7 8 9 10

my $requete6="SELECT CDART FROM vue_reliquats WHERE CLIC=$CDADH AND CDART=$CDARTC;"; my $version6 = $dbh->prepare($requete6); $version6-> execute() || die "pb de selection : $DBI::errstr"; my $CDARTR = $version6 -> fetchrow_array;   if($CDARTR==NULL) #Probleme, plutot mettre "si requette est nulle" { #Inserer dans une table }

---

La synthaxe $CDARTR==NULL peut-elle fonctionner pour dire "Si la requette n'a trouvé aucun enregistrement" ?

Merci

correction :

Code:

---

my $CDARTR = $version6 -> fetchrow_array;

---

faux car tu utilise fetchrow_array; et renvoie un tableau.
Donc tu dois ecrire ainsi

Code:

---

my ($CDARTR) = $version6 -> fetchrow_array;

---

Ensuite, tu peux juste verifier s'il est definie

Code:

---

1 2 3 4

if (defined $CDARTR) {   ... }

---

Merci !

A l'inverse, dois-je utiliser :

Code:

---

if (not defined $CDARTR)

---

ou comme en C :

Code:

---

if (!defined $CDARTR)

---

les 2 fontionne

C'est d'accord, merci bien !

Une derniere petite question car ça me pose probleme :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

my $requete6="SELECT CDART FROM vue_reliquats WHERE CLIC=$CDADH AND CDART=\'$CDARTC\'"; my $version6 = $dbh->prepare($requete6); #$version6-> execute() || die "pb de selection : $DBI::errstr"; #my ($CDARTR) = $version6 -> fetchrow_array; if(not defined $version6) { printf("hello"); #Inserer dans une table si pas de reliquat $sth01->execute($CDADH,$CDCAT,$CDARTC) or die "Impossible d'executer l'instruction SQL finale de creation de table : $DBI::errstr\n"; }

---

Désolé !