lib/Moose/Autobox.pm

   1
   2 package Moose::Autobox;
   3
   4 use strict;
   5 use warnings;
   6
   7 use Moose        ();
   8 use Scalar::Util ();
   9
  10 our $VERSION = '0.01';
  11
  12 sub import {
  13     eval q|
  14 package SCALAR;
  15 use Moose;
  16 with 'Moose::Autobox::Scalar';
  17
  18 package ARRAY;
  19 use Moose;
  20 with 'Moose::Autobox::Array';
  21
  22 package HASH;
  23 use Moose;
  24 with 'Moose::Autobox::Hash';
  25
  26 package CODE;
  27 use Moose;
  28 with 'Moose::Autobox::Code';
  29     |;
  30 }
  31
  32 1;
  33
  34 __END__
  35
  36 =pod
  37
  38 =head1 NAME
  39
  40 Moose::Autobox - autoboxed for her pleasure
  41
  42 =head1 SYNOPOSIS
  43
  44 =head1 DESCRIPTION
  45
  46   Any
  47   Item
  48       Bool
  49       Undef
  50       Defined
  51           Value
  52               Num
  53                 Int
  54               Str
  55           Ref
  56               ScalarRef
  57               ArrayRef
  58               HashRef
  59               CodeRef
  60               RegexpRef
  61               Object
  62                   Role
  63
  64
  65 =head1 BUGS
  66
  67 All complex software has bugs lurking in it, and this module is no
  68 exception. If you find a bug please either email me, or add the bug
  69 to cpan-RT.
  70
  71 =head1 AUTHOR
  72
  73 Stevan Little E<lt>stevan@iinteractive.comE<gt>
  74
  75 =head1 COPYRIGHT AND LICENSE
  76
  77 Copyright 2006 by Infinity Interactive, Inc.
  78
  79 L<http://www.iinteractive.com>
  80
  81 This library is free software; you can redistribute it and/or modify
  82 it under the same terms as Perl itself.
  83
  84
  85 =cut
  86
  87