my $req = Apache2::Request->new( $r ) ; #récupérer les arguments my (%args, @args) ; #recherche des paramètres de la requête @args = $req->param ; for ( @args ) { $args{ $_ } = Encode::decode_utf8( $req->param($_) ) ; #les double-quotes et les <> viennent interférer avec le html $args{ $_ } =~ tr/<>"/'/ ; #cas de la barre espace, qui décale la colonne suivante; on supprime $args{ $_ } =~ s/^\s+$// ; }