X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FAutobox%2FScalar.pm;h=9236510d7609107578b0e10c4cbf5faf97c63e5e;hb=3f4dd8b74b711eefe941a391a327389fb05abf7f;hp=dc8a12d57bab1abb22a76c3b2c59a67ded1c228a;hpb=6cf5bcf23399cc82e234f91a2e78f262bf70eab1;p=gitmo%2FMoose-Autobox.git diff --git a/lib/Moose/Autobox/Scalar.pm b/lib/Moose/Autobox/Scalar.pm index dc8a12d..9236510 100644 --- a/lib/Moose/Autobox/Scalar.pm +++ b/lib/Moose/Autobox/Scalar.pm @@ -3,11 +3,55 @@ use Moose::Role 'with'; our $VERSION = '0.01'; -with 'Moose::Autobox::Value', - 'Moose::Autobox::String'; - -# ::Value requirement +with 'Moose::Autobox::String', + 'Moose::Autobox::Number'; sub print { CORE::print $_[0] } - -1; \ No newline at end of file +sub say { CORE::print $_[0], "\n" } +1; + +__END__ + +=pod + +=head1 NAME + +Moose::Autobox::Scalar - the Scalar role + +=head1 DESCRIPTION + +This is a role to describes a Scalar value, which is defined +as the combination (union sort of) of a String and a Number. + +=head1 METHODS + +=over 4 + +=item B + +=item B + +=item B + +=back + +=head1 BUGS + +All complex software has bugs lurking in it, and this module is no +exception. If you find a bug please either email me, or add the bug +to cpan-RT. + +=head1 AUTHOR + +Stevan Little Estevan@iinteractive.comE + +=head1 COPYRIGHT AND LICENSE + +Copyright 2006 by Infinity Interactive, Inc. + +L + +This library is free software; you can redistribute it and/or modify +it under the same terms as Perl itself. + +=cut