LINUX.ORG.RU

История изменений

Исправление helios, (текущая версия) :

package A;
use Moose;
sub make {
    has $_, is => "rw" for "a" .. "z";
}

package main;
my $a = new A;
$a->make;
print $a->b("s");



Пиши, где хочешь. После исполнения кода, который описывает поля, появятся поля.

Исходная версия helios, :

[code=perl]
package A;
use Moose;
sub make {
has $_, is => «rw» for «a» .. «z»;
}

package main;
my $a = new A;
$a->make;
print $a->b(«s»);'
[/code]

Пиши, где хочешь. После исполнения кода, который описывает поля, появятся поля.