perl unload Oracle utf8 数据库
1.脚本允许环境 utf8
[oracle@oadb sbin]$ cat unload_oracle_utf8.pl
#!/usr/bin/perl
use DBI;
use Encode;
my $dbName = 'oadb';
my $dbUser = 'vxspace';
my $dbUserPass = 'newja01';
my $dbh = DBI->connect("dbi:Oracle:$dbName", $dbUser, $dbUserPass) or die "can't connect to database ";
my $table_name= "$ARGV[0]";
my $hostSql = qq{select COLUMN_NAME from dba_tab_columns where table_name=upper('$table_name')};
my $UNLOAD_SRC_DBCONN = DBI->connect("DBI:Oracle:".$dbName,$dbUser,$dbUserPass) or die("DB connect error!n");
my $DW_DATA_DT ="";
my $datafile="$table_name.TXT";
use HTTP::Date qw(t
perl unload Oracle utf8 数据库
最新推荐文章于 2022-04-20 11:43:35 发布
这篇博客详细介绍了如何使用Perl脚本与Oracle数据库进行交互,特别是在处理UTF8编码的数据时的注意事项和最佳实践。内容涵盖了连接配置、SQL查询、数据转换等方面,旨在帮助读者解决Perl在处理Oracle UTF8数据库时可能遇到的问题。
摘要由CSDN通过智能技术生成