Split et expression régulière

Bonjour,

J'essaye de faire un expresion régulière.

dans des variables j'ai des lignes du types

Code:

---

1 2 3 4

$var1 = "/rep1/text.txt"; $var2 = "text.txt"; $var3 = "/rep1/rep2/rep3/text.txt";

---

je voudrais donc dans chaque variable récupérer uniquement text.txt


Pourriez-vous me donner une piste.

D'avance merci

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

#!/usr/bin/perl use strict; use warnings; map { my @array = split(/\//); my $page = pop(@array); print("variable : [$_] - nom de la page : [$page]\n"); } ( my $var1 = "/rep1/text.txt" , my $var2 = "text.txt" , my $var3 = "/rep1/rep2/rep3/text.txt" , );

---

Grand Merci


:)

MaitrePylos