my $sth =  $vid->column_info( "%", "datenbank", "tabelle","spalte");

print Dumper $sth;