Linux Certif

Toute la documentation sur la certification Linux LPI

Mixin::Linewise::Readers.3pm

NAME

Mixin::Linewise::Readers - get linewise readers for strings and filenames

SYNOPSIS

   package Your::Pkg;
   use Mixin::Linewise::Readers -readers;
 
   sub read_handle {
     my ($self, $handle) = @_;
 
     LINE: while (my $line = $handle->getline) {
       next LINE if $line =~ /^#/;
 
       print "non-comment: $line";
     }
   }
 
 

Then:

   use Your::Pkg;
 
   Your::Pkg->read_file($filename);
 
   Your::Pkg->read_string($string);
 
   Your::Pkg->read_handle($fh);
 
 

EXPORTS

"read_file" and "read_string" are exported by default. Either can be requested individually, or renamed. They are generated by Sub::Exporter, so consult its documentation for more information.

Both can be generated with the option ``method'' which requests that a method other than ``read_handle'' is called with the created IO::Handle.

read_file

   Your::Pkg->read_file($filename);
 
 

If generated, the "read_file" export attempts to open the named file for reading, and then calls "read_handle" on the opened handle.

Any arguments after $filename are passed along after to "read_handle".

read_string

   Your::Pkg->read_string($string);
 
 

If generated, the "read_string" creates an IO::String handle from the given string, and then calls "read_handle" on the opened handle.

Any arguments after $string are passed along after to "read_handle".

BUGS

Bugs should be reported via the CPAN bug tracker at

http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Mixin-Linewise <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Mixin-Linewise>

For other issues, or commercial enhancement or support, contact the author.

AUTHOR

Ricardo SIGNES, "E<lt>rjbs@cpan.orgE<gt>"

COPYRIGHT

Copyright 2008, Ricardo SIGNES.

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