Récupérer extension d'un fichier

Le
Régine
Bonjour,

Je souhaite récupérer l'extension d'un fichier exemple:
var = toto.jpeg

soit le .jpg

Merci pour votre aide

Cordialement

Régine
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
espie
Le #26489449
In article Régine
Bonjour,
Je souhaite récupérer l'extension d'un fichier exemple:
var = toto.jpeg
soit le .jpg

Bibliotheque standard, File::Basename
confere la doc
Régine
Le #26489521
Le jeudi 20 septembre 2018 08:22:43 UTC+2, Régine a écrit :
Bonjour,
Je souhaite récupérer l'extension d'un fichier exemple:
var = toto.jpeg
soit le .jpg
Merci pour votre aide
Cordialement
Régine

Merci beaucoup
j'ai ceci
use File::Basename;
my ( $name, $path, $extension) = fileparse ( $filename, '..*' );
$filename = $name . $extension;
Var $extension j'obtient toujours toto.jpeg
et c'est seulement .jpeg qu'il me faut.
Bien à vous
Régine
Olivier Miakinen
Le #26489548
Le 21/09/2018 14:48, Régine répondait à elle-même :
use File::Basename;
my ( $name, $path, $extension) = fileparse ( $filename, '..*' );

D'où sort ce '..*' ?
Je ne connais pas encore Perl (hélas) mais il me semble avoir
trouvé la solution toute cuite dans la doc :
# On Unix returns ("baz", "/foo/bar/", ".txt")
fileparse("/foo/bar/baz.txt", qr/.[^.]*/);
</>
--
Olivier Miakinen
Publicité
Poster une réponse
Anonyme