Discussion :

[kimikou]

Bonjour,

Code :

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

print FILE "$fic";

m'affiche actuellement : /home/user/Proj/test1.txt

Mais j'aimerai seulement afficher test1
Est-ce possible?

Merci d'avance.

[Xav_33]

En utilisant le package File::basename disponible sur CPAN.

Et ensuite :

Code :

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

1
2
my $name = basename ($fic) ;
print "$name\n" :

[Lolo78]

Le package s'appelle File::Basename (avec un B majuscule).

Et c'est effectivement la meilleure solution.

Sinon, une expression régulière le fait aussi:

Code :

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

($basename = $fic) =~ s!^.*/!!;

Elle supprime tout ce qui précède le dernier /.

[kimikou]

Merci, j'ai utilisé l'expression régulière.

Mais j'aimerai aussi pouvoir supprimer le '.txt' si possible ?

[Lolo78]

Pareil, tu peux utiliser le paquetage File::Basename ou une seconde expression régulière:

Code :

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

1
2
($basename = $fic) =~ s!^.*/!!; # supprime le chemin
$basename =~ s/\.txt$//; # supprime le point et le suffixe

[kimikou]

Effectivement, cela marche très bien, merci!

Mais, est-ce je peux avoir si possible une explication de ces 2 expressions régulières ?

car j'aimerai au final, passer de /home/user/Proj/test_def_ghi.txt
à def --> ghi