t/DynamicMoose/ProhibitPublicBuilders.run

   1 ## name No builder method
   2 ## failures 0
   3 ## cut
   4
   5 package Class;
   6 use Moose;
   7
   8 has attr => (
   9     is => 'rw',
  10 );
  11
  12 #-----------------------------------------------------------------------------
  13
  14 ## name Private builder method
  15 ## failures 0
  16 ## cut
  17
  18 package Class;
  19 use Moose;
  20
  21 has attr => (
  22     is => 'rw',
  23     builder => '_build_attr',
  24 );
  25
  26 #-----------------------------------------------------------------------------
  27
  28 ## name Public builder method
  29 ## failures 1
  30 ## cut
  31
  32 package Class;
  33 use Moose;
  34
  35 has attr => (
  36     is => 'rw',
  37     builder => 'build_attr',
  38 );
  39