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