1 use utf8; 2 open A, ">&STDOUT"; 3 open STDOUT, ">AA.txt"; 4 print STDOUT 'AB'; 5 open STDOUT, ">&A"; 6 binmode(STDOUT,":encoding(gbk)"); 7 print "你好\n";
先把A重定向到STDOUT，
之后的STDOUT不代表標准輸出了
到最后用完了再恢復
perl輸出重定向
免責聲明！
本站轉載的文章為個人學習借鑒使用，本站對版權不負任何法律責任。如果侵犯了您的隱私權益，請聯系本站郵箱yoyou2525@163.com刪除。