costas has asked for the wisdom of the Perl Monks concerning the following question:
#!/usr/bin/perl -w use strict; use DBI; #probe DBI for available drivers my @drivers = DBI->available_drivers(); ##iterate through drivers and list the data source for each one foreach my $driver (@drivers) { print "Driver: $driver\n"; my @datasources = DBI->data_sources($driver); foreach my $datasource (@datasources) { print "\tData Source is $datasource\n"; } print "\n"; } exit;
Driver: ExampleP Data Source is dbi:ExampleP:dir=. Driver: Multiplex Driver: Proxy
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: DBD Drivers query
by arturo (Vicar) on Apr 05, 2001 at 18:23 UTC | |
by costas (Scribe) on Apr 05, 2001 at 18:38 UTC | |
|
Re: DBD Drivers query
by sutch (Curate) on Apr 05, 2001 at 21:10 UTC | |
by costas (Scribe) on Apr 06, 2001 at 12:41 UTC | |
by sutch (Curate) on Apr 06, 2001 at 17:38 UTC | |
by costas (Scribe) on Apr 06, 2001 at 18:52 UTC |