Recherche d'une fonction qui ajoute les slashs.

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Recherche d'une fonction qui ajoute les slashs.

neo00neo

Bonjour,
j'aurais aimé savoir si il existait en Perl une fonction comme en PHP qui rajoute automatiquement des slashs pour protéger les données d'une variable. Par exemple si dans cette variable on a des caractères spéciaux, et que l'on souhaite les traiter comme une chaine normale.
Merci.

Publicité

pospos

"\Q$var"

mais tu a de meilleures solutions, tout depend de ce que tu veux echapper

apr exemple si c'est pour faire une requete SQL alors il faut utiliser els placeholders dans DBI (ou sa fonction quote)
si c'est une URL t'as les fonction du module URI
si c'est du HTML tu as ce qu'il faut dans CGI.pm (et d'autres)
etc...

burgergold

5$? va chez l'diable!

$var =~ s/('|" )/\\$1/g;
dans le ('|" ), tu ajoutes tous les caractères que tu veux ajouter un backslash

mais la solution de pospos semble la meilleure

neo00neo

Oui, c'était une URL, je vous remercie.

pospos

ha si c'est pour une URL voila une petite fonction qui ira bien:

Code :

sub escape {
my $str = shift;
$str =~ s/([^A-Za-z0-9\-_.!~*'()])/uc sprintf("%%%02x",ord($1))/eg;
$str
}

FORUM HardWare.fr

Programmation

Perl

Recherche d'une fonction qui ajoute les slashs.

Sujets relatifs
problème avec la fonction onBlur	fonction Timer vide, problème ???
[Debugger C] Recherche debugger sous Win XP (pas gdb)	Probleme avec la fonction mail
Modification vbs fonction replace de XXX à YYY	recherche d'index absents d'une liste de tables définie
Recherche de l'unicité..........	fonction aujourd'hui en vba
Faire une recherche/remplacer dans plusieurs fichiers	fonction remplacement
Plus de sujets relatifs à : Recherche d'une fonction qui ajoute les slashs.

Page générée en 0.025 secondes