Slash Boxes
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
More | Login | Reply
Loading... please wait.
  • If you're using Moose, MooseX::AttributeHelpers [] has a Counter helper that will give you increment_num and decrement mutators:

    use MooseX::AttributeHelpers;

    has num => (
      metaclass => 'Counter',
      isa       => 'Num',
      is        => 'ro',
      provides  => {
        inc => 'inc_num',
        dec => 'dec_num',
        reset => 'reset_num',

    my $thing = Foo->new(num => 26);

  • Makes me thankful there's Rakudo/Perl6, in which none of this is necessary.