That won't work too well.

use open IN  => ":crlf", OUT => ":bytes";
use open OUT => ':utf8';
use open IO  => ":encoding(iso-8859-7)";

use open IO  => ':locale';

use open ':utf8';
use open ':locale';
use open ':encoding(iso-8859-7)';