一直想写个perl导入程序,但是不同数据库之间字段类型转换问题很头疼,查询系统表对于不同数据库得写不同的SQL,很不通用,于是在想perl的数据库包是否提供了这个方法,找了很久,终于找到了perl的方法,写法如下:
my $col_length=$DBConnection->column_info($catalog,$schema,$table,$getcolumn);
my @info = $col_length->fetchrow_array()
传入相应的$schema和$table便能获取到字段名、字段类型、字段长度等信息,只要写个不同数据类型的转换方法就可以了