オブジェクト？ 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 回答日時： 2005/08/09 02:33

＞既存のprint, getc, read, write関数をオーバーライド？することは可能でしょうか？

printは、オーバーライドすることができません。
それ以外は、置き換えることができます。

参考URL：http://okweb.jp/kotaeru.php3?qid=1150465