Discussion :

[cj_prog]

Bonjour,
je n'arrive pas à trouver le nom de mon repertoire courant;

j'ai utilisé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 my $dir = getcwd;

et sa marche, mais je voudrai juste le dernier nom du repertoire et nom pas tous le chemin,
car la il m'affiche /Home/.../../TOTO, hors je veux que le TOTO;
mercii !!!!!!

[cj_prog]

S'il vous plait,

aidez moi;

merci

[stoyak]

l'utilisation de getcwd te donne le chemin complet du répertoire courant. Pour connaitre le nom d'un répertoire ou fichier, il faut utiliser le module File::Basename.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
#!/usr/bin/perl
use strict;
use warnings;
use File::Basename;
use Cwd;
 
my $nom_repertoire =  dirname getcwd;