NAME

PerlIO::via::UnComment - PerlIO layer for removing comments

SYNOPSIS

 use PerlIO::via::UnComment;

 open( my $in,'<:via(UnComment)','file.pm' )
  or die "Can't open file.pm for reading: $!\n";


 open( my $out,'>:via(UnComment)','file.pm' )
  or die "Can't open file.pm for writing: $!\n";

DESCRIPTION

This module implements a PerlIO layer that removes comments (any lines that start with '#') on input and on output. It is intended as a development tool only, but may have uses outside of development.

EXAMPLES

Here are some examples, some may even be useful.

Source only filter, but with pod

A script that only lets uncommented source code and pod pass.

 #!/usr/bin/perl
 use PerlIO::via::UnComment;
 binmode( STDIN,':via(UnComment)' ); # could also be STDOUT
 print while <STDIN>;

Source only filter, even without pod

A script that only lets uncommented source code.

 #!/usr/bin/perl
 use PerlIO::via::UnComment;
 use PerlIO::via::UnPod;
 binmode( STDIN,':via(UnComment):via(UnPod)' ); # could also be STDOUT
 print while <STDIN>;

REQUIRED MODULES

 (none)

COPYRIGHT

PerlIO::via::UnComment - PerlIO layer for removing comments