has uploads => (
is => 'rw',
required => 1,
- lazy => 1,
default => sub { {} },
);
);
has _body => (
- is => 'rw',
+ is => 'rw', clearer => '_clear_body', predicate => '_has_body',
);
# Eugh, ugly. Should just be able to rename accessor methods to 'body'
# and provide a custom reader..