addons/DBI/samples/driver_info.io

   1 #!/usr/bin/env io
   2
   3 showInfo := method(d,
   4         ("          Name: " .. d at(0)) println
   5         ("   Description: " .. d at(1)) println
   6         ("      Filename: " .. d at(2)) println
   7         ("       Version: " .. d at(3)) println
   8         ("      Compiled: " .. d at(4)) println
   9         ("        Author: " .. d at(5)) println
  10         ("           URL: " .. d at(6)) println
  11         "" println
  12 )
  13
  14 ("Libdbi version: " .. DBI version) println
  15 (" Drivers found: " .. DBI init) println
  16 "" println
  17
  18 DBI drivers foreach(d, showInfo(d))