2 package MooseX::Storage::Engine::IO::File;
15 my $fh = IO::File->new($self->file, 'r');
16 return do { local $/; <$fh>; };
20 my ($self, $data) = @_;
21 my $fh = IO::File->new($self->file, 'w');
33 MooseX::Storage::Engine::IO::File
47 =item B<store ($data)>
61 All complex software has bugs lurking in it, and this module is no
62 exception. If you find a bug please either email me, or add the bug
67 Chris Prather E<lt>chris.prather@iinteractive.comE<gt>
69 Stevan Little E<lt>stevan.little@iinteractive.comE<gt>
71 =head1 COPYRIGHT AND LICENSE
73 Copyright 2007 by Infinity Interactive, Inc.
75 L<http://www.iinteractive.com>
77 This library is free software; you can redistribute it and/or modify
78 it under the same terms as Perl itself.