NAME

PerlIO::via::chop - PerlIO layer to chop the last byte outputted

SYNOPSIS

use PerlIO::via::chop;

open( my $in,'<:via(chop)','file.txt' );	# no effect
open( my $out,'>:via(chop)','file.txt' );	# last byte is chopped

DESCRIPTION

This module implements a PerlIO layer that chops the last byte written to the file.

SEE ALSO

PerlIO::via

AUTHORS

Autrijus Tang <autrijus@autrijus.org>

COPYRIGHT

Copyright 2002 by Autrijus Tang <autrijus@autrijus.org>.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html