in reply to Re: Re: Re: Installing DBD problems
in thread Installing DBD problems
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<br>"; if ($driver ne "Proxy" && $driver ne "Multiplex") ##DBD:Proxy and +DBD::Multiplex have problem with datasources { my @datasources = DBI->data_sources($driver); foreach my $datasource (@datasources) { print "\tData Source is $datasource<br>"; } } print "\n"; }
Driver: ExampleP Data Source is dbi:ExampleP:dir=. Driver: Proxy Driver: mysql
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: Re: Re: Re: Installing DBD problems
by MZSanford (Curate) on Oct 16, 2001 at 13:59 UTC |