发布时间:2013-01-17 09:47:24
#!/usr/bin/perlpackage octopus::record::sqlserver;use Data::Dumper;use DBI;use Encode;use vars qw($VERSION @ISA @EXPORT);$VERSION = 1.00;@ISA = qw();@EXPORT = ();# ----------------------------------------------------# 构造函数# ......【阅读全文】