NAME

Mixin::Linewise::Writers - get linewise writeers for strings and filenames

VERSION

version 0.004

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.

AUTHOR

Ricardo SIGNES <rjbs@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2008 by Ricardo SIGNES.

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