NAME¶
Mixin::Linewise::Writers - get linewise writeers for strings and filenames
SYNOPSIS¶
package Your::Pkg;
use Mixin::Linewise::Writers -writers;
sub write_handle {
my ($self, $data, $handle) = @_;
$handle->print("datum: $_\n") for @$data;
}
Then:
use Your::Pkg;
Your::Pkg->write_file($data, $filename);
Your::Pkg->write_string($data, $string);
Your::Pkg->write_handle($data, $fh);
EXPORTS¶
"write_file" and "write_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 "write_handle" is called with the created
IO::Handle.
write_file¶
Your::Pkg->write_file($data, $filename);
This method will try to open a new file with the given name. It will then call
"write_handle" with that handle.
Any arguments after $filename are passed along after to
"write_handle".
write_string¶
my $string = Your::Pkg->write_string($data);
"write_string" will create a new IO::String handle, call
"write_handle" to write to that handle, and return the resulting
string.
Any arguments after $data are passed along after to "write_handle".
BUGS¶
Bugs should be reported via the CPAN bug tracker at
<
http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Mixin-Linewise>
For other issues, or commercial enhancement or support, contact the author.
AUTHOR¶
Ricardo SIGNES, "<rjbs@cpan.org>"
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.