1 package Moose::Autobox::Scalar;
2 use Moose::Role 'with';
6 with 'Moose::Autobox::String',
7 'Moose::Autobox::Number';
10 sub print { CORE::print $_[0] }
11 sub say { CORE::print $_[0], "\n" }
20 Moose::Autobox::Scalar - the Scalar role
24 This is a role to describes a Scalar value, which is defined
25 as the combination (union sort of) of a String and a Number.
39 Flattening a scalar just returns the scalar. This means that you can say:
41 my @array = $input->flatten;
43 # Given $input of 5, @array is (5);
44 # Given $input of [ 5, 2, 0], @array is (5, 2, 0)
50 All complex software has bugs lurking in it, and this module is no
51 exception. If you find a bug please either email me, or add the bug
56 Stevan Little E<lt>stevan@iinteractive.comE<gt>
58 =head1 COPYRIGHT AND LICENSE
60 Copyright 2006-2008 by Infinity Interactive, Inc.
62 L<http://www.iinteractive.com>
64 This library is free software; you can redistribute it and/or modify
65 it under the same terms as Perl itself.