test variable vide

Comment puis je faire pour tester si ma variable est vide ou pas !!!

my $FicError ;

Code:

---

1 2 3 4

if (-s $FicError) { print "variable non vide\n" ; }

---

est ce bon , sachant que ce n'est pas un fichier mais une variable

A tester !!!!!

Code:

---

1 2 3 4 5

use strict;   my $FicError;   print "variable vide\n" if ($FicError eq undef);

---

Affichera variable vide si $FicError ne se voit rien affecté comme valeur !!!!!

Affichera variable vide si $FicError = ""; !!!!!

Attention au piège : si $FicError contient 0, n'affichera alors pas le contenu de mon print !!!!!

Si tu souhaites également prendre en compte le contenu de ta variable lorsqu'elle contient 0 (différent de vide), alors voici le même code modifié !!!!!

Code:

---

1 2 3 4 5

use strict;   my $FicError;   print "variable vide\n" if ($FicError eq undef || ! $FicError);

---

Heu sinon, tu sais qu'en cherchant un peu ici, tu trouverais des cours fort utiles pour apprendre les notions de base de Perl ?

Plusieurs possibilités, selon ce que tu entends par "vide".

Si "vide", c'est "égal à zero" :

Code:

---

1 2	if ($variable == 0) {} ... if (not ($variable)) {} ...

---

Si "vide", c'est "égal à une chaine vide" (encore que la définition de "chaine vide" soit elle aussi sujete à interprétation) :

Code:

---

1 2 3

if ($variable eq "") {} ... if ($variable =~ m/^\s*$/) {} ... if (not ($variable)) {} ...

---

Si "vide", c'est "indéfinie", jamais utilisée :

Code:

---

if (not (defined($var))) {} ...

---

Toutes ces informations se trouvent en de multiples endroits, tant de ce site que du web ... voir par exemple dans la FAQ