PERL -> access DB

Bon ca a changé, ca donne ca maintenant mais le probleme reste entier... snif!

#!C:/Perl/bin/perl.exe

use DBI;

# liste des drivers présents :
my @driver_names = DBI->available_drivers;
my @data_sources = DBI->data_sources("mysql", \%attr);

my $nbDriver = @driver_names;

print "Nombre de driver presents : $nbDriver\n";
foreach my $un_driver (@driver_names){
print "\nle driver: $un_driver\n";
eval { @data_sources = DBI->data_sources($un_driver);}; print "probleme avec ce driver ($un_driver)\n" if $@;
foreach my $un_db (@data_sources){
print " database: $un_db\n";
}
@data_sources =();
}

C bon j'ai réussi, merci de votre aide précieuse.. ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~

Lol, tu aimes bien te faire des posts tout seul toi :-DDDDD
promis je cours à ton secours la prochaine fois ;-) opopop :-P

Oui, j'en ai toute une collection sur les question que j'ai posé en Perl !! ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~

Genre !
Tu ose faire des remarques sur un langage aussi 'brillebrille'ant ! ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~

Ah bon, ben bonne chance alors !
Faut dire que j'ai attaqué de suite sur les acces DB et traitements de requetes sans connaitre ce qu'était un hash...
... enfin je dit ça mais... tu verra bien! AH AH !
;) ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~

Alors ca donne quoi de bon cet apprentissage ;) ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~

Oui, c'est relativement utilisé pour la manip de chaine, et c'est tres pratique pour ce que j'ai à faire : traiter et adapter des requetes à un type de base.

Pour le reste, c'est pas tres intéressant je trouve. ~ iclic @ gauch,iclic,  iclic @ droate, iclic, iclic
             et ya pas de bôg môsieu !    ~