| SQL :: interpolate SQL :: L'interpolate est un module Perl pour interpoler les variables de Perl dans des relevés SQL. |
Télécharger maintenant |
SQL :: interpolate Classement & Résumé
- Licence:
- Perl Artistic License
- Nom de l'éditeur:
- David Manura
- Site Internet de l'éditeur:
- http://search.cpan.org/~dmanura/SQL-Interpolate-0.33/lib/SQL/Interpolate.pm
SQL :: interpolate Mots clés
SQL :: interpolate La description
SQL :: L'interpolate est un module Perl pour interpoler les variables PERL dans des relevés SQL. SQL :: L'interpolate est un module Perl pour interpoler des variables Perl dans des instructions SQL.Synopsis Utilisez SQL :: Interpolate QW (: tous); # Quelques échantillons de données à interpoler: mon $ S = 'bleu'; mon @v = (5, 6); # Les références variables sont transformées en paramètres de liaison. # L'utilisation la plus basique implique des scalaires (ainsi que des arrayrefs # précédents par "in"). mon ($ sql, @bind) = sql_interp 'Sélectionnez * à partir de la table où x =', $ s, 'et y in', @v; # Résultat: # $ sql = 'Sélectionnez * à partir de MyTable où x =? Et y dans (?,?) '# @Bind = ($ s, @v); # Dans certains contextes, un arrayref ou Hashref agit comme un seul tuple: mon ($ SQL, @bind) = sql_interp 'insert dans la table', {x => s, y => 1}; # Résultat: # $ sql = 'insérer dans des valeurs mytables (x, y) (?,?)'; # @bind = ($ s, 1); mon ($ SQL, @bind) = sql_interp 'Mettre à jour la table Set', {x => s, y => 1}, "où y ', 2; # Résultat: # $ SQL = 'Mise à jour MyTable Set x =?, Y =? Où y? '; # @bind = ($ S, 1, 2); # En général, un hashref fournit un raccourci pour spécifier # une construction logique et de construction: mon ($ sql, @bind) = sql_interp 'Sélectionnez * à partir de la table où', {x => $ s, y => @v}; # Résultat: # $ sql = 'Sélectionnez * de MyTable où (x =? Et y dans (?,?))'; # @bind = ($ s, @v); # En général, un arrayref agit en conséquence ou référence à # une table temporaire: mon ($ SQL, @bind) = sql_interp , ], "Union", , ] # résultat: # $ SQL = 'Sélectionnez * à partir de (SELECT?, ?) As Tbl0 '; # @Bind = (1,2,4,5); # Chaque résultat ci-dessus convient au passage à DBI: My $ res = dBH-> selectall_arrayref ($ SQL, UNDF, @bind); # Outre ces techniques simples montrées, SQL-interpolate inclut # divers modules optionnels pour intégrer davantage SQL :: Interpoler avec # DBI et rationaliser la syntaxe avec filtrage source et macros (voir # La section L): Utilisez DBIX :: Interpolate filtre => 1; ... mes rangées $ = $ dbx-> selectall_arrayref (SQL ); Exigences: · Perl
SQL :: interpolate Logiciels associés