Recherche:

Comme Philou et moi-même te l'avons signalé, le test correct est:


if ($ligne =~ /\.xml/) { # ...

Le point ayant une signification particulière dans une regex (caractère quelconque sauf saut...

Bonjour,

Essaie ceci:


#!/usr/bin/perl
use strict;
use warnings;

my $fichier = shift;