Comment voir si un répertoire existe ou non en Perl?
Pour voir si un fichier existe avant de l'utiliser, nous pouvons utiliser:
if (-e "filename.cgi")
{
#proceed with your code
}
Mais comment identifier un répertoire existe ou non?
Utilisation -d _ ( liste complète des tests de fichiers )
if (-d "cgi-bin") {
# directory called cgi-bin exists
}
elsif (-e "cgi-bin") {
# cgi-bin exists but is not a directory
}
else {
# nothing called cgi-bin exists
}
En note, -e ne fait pas la distinction entre les fichiers et les répertoires. Pour vérifier si quelque chose existe et est un fichier brut, utilisez -f.