Salut,

un exemple, à voir si ça peut aider



#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;