[Moscow.pm] Динамические возможности Perl :: помощь коллективного разума

[Yuri Pats]

2010/4/30 Andrei <andrei.protasovitski на gmail.com>:
>
>
> 30 апреля 2010 г. 17:01 пользователь Akzhan Abdulin
> <akzhan.abdulin на gmail.com> написал:
>>
>> Здесь я определяю метод класса, который ниже в определении же класса
>> вызываю, и он создаёт пару методов экземпляра.
>> class Something
>>   def self.reporter(*names)
>>     names.each do |name|
>>       define_method(name) do
>>         puts "You have called #{name}"
>>       end
>>     end
>>   end
>>   reporter :ametist, :rubinius
>> end
>>
>> obj = Something.new
>> obj.ametist
>> obj.rubinius
>
> Почти так же круто, как Class::Accessor. :-P
>

$obj->meta->mk_accessor('blah') можно так?

-- 
WBR, Yuri Pats