oose - syntactic sugar to make Moose one-liners easier

Authors

       •   Stevan Little <stevan@cpan.org>

       •   Dave Rolsky <autarch@urth.org>

       •   Jesse Luehrs <doy@cpan.org>

       •   Shawn M Moore <sartak@cpan.org>

       •   יובל קוג'מן (Yuval Kogman) <nothingmuch@woobling.org>

       •   Karen Etheridge <ether@cpan.org>

       •   Florian Ragwitz <rafl@debian.org>

       •   Hans Dieter Pearcey <hdp@cpan.org>

       •   Chris Prather <chris@prather.org>

       •   Matt S Trout <mstrout@cpan.org>

Bugs

       See "BUGS" in Moose for details on reporting bugs.

Copyright And License

       This software is copyright (c) 2006 by Infinity Interactive, Inc.

       This is free software; you can redistribute it and/or modify it under  the  same  terms  as  the  Perl  5
       programming language system itself.

perl v5.40.0                                       2024-10-20                                          oose(3pm)

Dependencies

       You will need Filter::Simple and eventually Moose

Description

       oose.pm is a simple source filter that adds "package $name; use Moose; use Moose::Util::TypeConstraints;"
       to the beginning of your script and was entirely created because typing "perl -e'package Foo; use Moose;
       ...'" was annoying me.

Incompatibilities

       None reported. But it is a source filter and might have issues there.

Interface

       oose provides exactly one method and it's automatically called by perl:

       import($package)
           Pass  a  package  name  to import to be used by the source filter. The package defaults to "Class" if
           none is given.

Name

       oose - syntactic sugar to make Moose one-liners easier

Synopsis

         # create a Moose class on the fly ...
         perl -Moose=Foo -e 'has bar => ( is=>q[ro], default => q[baz] ); print Foo->new->bar' # prints baz

         # loads an existing class (Moose or non-Moose)
         # and re-"opens" the package definition to make
         # debugging/introspection easier
         perl -Moose=+My::Class -e 'print join ", " => __PACKAGE__->meta->get_method_list'

         # also loads Moose::Util::TypeConstraints to allow subtypes etc
         perl -Moose=Person -e'subtype q[ValidAge] => as q[Int] => where { $_ > 0 && $_ < 78 }; has => age ( isa => q[ValidAge], is => q[ro]); Person->new(age => 90)'