SYNOPSIS

    Reading:

     use PerlIO::via::as_is;
     open my($fh), "<:via(as_is)", "file";
     print while <$fh>;

    Writing:

     open my($fh), ">:via(as_is)", "file";
     print $fh "one", "two\n";

DESCRIPTION

    This PerlIO layer does nothing (reads/writes everything as-is). Created
    for testing purpose.

SEE ALSO

    PerlIO::via