Help for this page
binmode STDOUT, ":unix"; binmode STDOUT, ":raw";
print "@{[PerlIO::get_layers(STDOUT)]}\n";