view release on metacpan or  search on metacpan

lib/Aion/Meta/FeatureConstruct.md  view on Meta::CPAN

```perl
$::construct->has # \> exists $self->{%(name)s}
```

## clear
Код удаления значения. Акцессор.

```perl
$::construct->clear # \> delete $self->{%(name)s}
```

## weaken
Код ослабления ссылки. Акцессор.

```perl
$::construct->weaken # \> Scalar::Util::weaken(%(get)s);
```

## accessor_name
Имя метода-акцессора. Акцессор.

```perl
$::construct->accessor_name # \> %(name)s
```

## reader_name
Имя метода-ридера. Акцессор.

```perl
$::construct->reader_name # \> _get_%(name)s
```

## writer_name
Имя метода-райтера. Акцессор.

```perl
$::construct->writer_name # \> _set_%(name)s
```

## predicate_name
Имя метода-предиката. Акцессор.

```perl
$::construct->predicate_name # \> has_%(name)s
```

## clearer_name
Имя метода-очистителя. Акцессор.

```perl
$::construct->clearer_name # \> clear_%(name)s
```

## initer
Код инициализации атрибута. Акцессор.

```perl
$::construct->initer # \> %(initvar)s%(write)s
```

## not_specified
Код инициализации, если значение не указано. Акцессор.

```perl
$::construct->not_specified # -> ''
```

## getter
Код геттера в акцессоре. Акцессор.

```perl
$::construct->getter # \> %(read)s
```

## setter
Код сеттера в акцессоре. По умолчанию: '%(write)s'.

```perl
$::construct->setter # \> %(write)s
```

## selfret
Код возврата из сеттера. Акцессор.

```perl
$::construct->selfret # \> $self
```

## add_attr($code, $unshift)
Добавляет атрибут к акцессору.

```perl
$::construct->add_attr(':bvalue');
$::construct->{attr} # --> [':lvalue', ':bvalue']
$::construct->add_attr(':a_value', 1);
$::construct->{attr} # --> [':a_value', ':lvalue', ':bvalue']
```

## add_preset($code, $unshift)
Добавляет код предустановки перед записью.

```perl
$::construct->add_preset('die if $val < 0;', 1);
$::construct->{preset} # -> 'die if $val < 0;'
```

## add_trigger($code, $unshift)
Добавляет триггер после записи.

```perl
$::construct->add_trigger('$self->on_change;');
$::construct->{trigger} # -> '$self->on_change;'
```

## add_cleaner($code, $unshift)
Добавляет код очистки перед удалением.

```perl
$::construct->add_cleaner('$self->{old} = $self->{attr};');
$::construct->{cleaner} # -> '$self->{old} = $self->{attr};'
```

## add_access($code, $unshift)
Добавляет код в геттер перед чтением атрибута.