perl unload gbk Oracle 數據庫use Encode; if ( $#ARGV < 0 ){print "請輸入一個文件\n";exit(-1);}$var = $ARGV[0]; open (FILE ,"<","$var") || die "can open file$!\n"; while (<FILE>) { $str = encode("gbk",decode("utf8","$_")); print "$str" ; } close FILE;需要的utf-8環境 把腳本格式轉換成gbkOracle shell 上設置:export NLS_LANG="SIMPLIFIED CHINESE_CHINA".ZHS16GBK查看數據庫字符集:客戶端字符集 SQL> select userenv('language') from dual;USERENV('LANGUAGE') ---------------------------------------------------- AMERICAN_AMERICA.ZHS16GBK服務端字符集 SQL> col parameter format a40 SQL> col value format a20SQL> select * from nls_database_parameters where parameter='NLS_CHARACTERSET'; PARAMETER VALUE ---------------------------------------- -------------------- NLS_CHARACTERSET ZHS16GBK

轉載于:https://www.cnblogs.com/zhaoyangjian724/p/6198984.html

《新程序員》：云原生和全面數字化實踐50位技術專家共同創作，文字、視頻、音頻交互閱讀

總結

以上是生活随笔為你收集整理的perl unload gbk oracle 数据库的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。