The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package NetHack::Item::Tool::Candelabrum;
{
  $NetHack::Item::Tool::Candelabrum::VERSION = '0.19';
}
use Moose;
extends 'NetHack::Item::Tool::Light';

use constant subtype => 'candelabrum';

has candles_attached => (
    is      => 'rw',
    isa     => 'Int',
    default => 0,
);

with 'NetHack::Item::Role::IncorporatesStats' => {
    attribute => 'candles_attached',
    stat      => 'candles',
};

__PACKAGE__->meta->make_immutable;
no Moose;

1;