package MooseX::RW::Reader;
{
  $MooseX::RW::Reader::VERSION = '0.001';
}
# ABSTRACT: Moose::Role reader

use Moose::Role;

with 'MooseX::RW';

requires 'read';


sub read {
    my $self = shift;
    $self->count($self->count + 1);
}


1;

__END__
=pod

=encoding UTF-8

=head1 NAME

MooseX::RW::Reader - Moose::Role reader

=head1 VERSION

version 0.001

=head1 METHODS

=head2 read

Required method to read anything.

=head1 AUTHOR

Frédéric Demians <f.demians@tamil.fr>

=head1 COPYRIGHT AND LICENSE

This software is Copyright (c) 2012 by Fréderic Démians.

This is free software, licensed under:

  The GNU General Public License, Version 3, June 2007

=cut