File: testdatasources.pl

package info (click to toggle)
libdbd-odbc-perl 1.13-4
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 544 kB
  • ctags: 287
  • sloc: perl: 3,395; ansic: 3,236; makefile: 55
file content (6 lines) | stat: -rw-r--r-- 156 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
 
use DBI;
# $Id: testdatasources.pl 93 2004-02-19 19:28:16Z jurl $

print join(', ', DBI->data_sources("ODBC")), "\n";
print $DBI::errstr;
print "\n";