オブジェクト？ perlをオーバーライドする方法？

質問

perl 5.6を使っております。
Perl5.8では PerlIOが入出力の際に文字コードを自動変換しているのですが
この機能を5.6でもスクリプト互換で使いたい（スクリプトを5.6と5.8を同じにする）のですが、
既存のprint, getc, read, write関数をオーバーライド？することは可能でしょうか？
一々、if(5.8 <= $])としたくないためです。

例えば、外部がeucでperl処理がutf8の場合

sub getc{

return Jcode->new(...)->utf8;
}

sub print{

return Jcode->new(...)->euc;
}

sub read{

return Jcode->new(...)->utf8;
}

sub write{

return Jcode->new(...)->euc;
}

回答No.1

BLUEPIXY · ベストアンサー

＞既存のprint, getc, read, write関数をオーバーライド？することは可能でしょうか？
printは、オーバーライドすることができません。
それ以外は、置き換えることができます。

参考URL：

http://okweb.jp/kotaeru.php3?qid=1150465