Thread Was ist eigentlich ein LVALUE?: Seltsamer Rückgabewert von ref (18 answers)
Opened by murphy at 2004-07-20 20:20

ptk
 2004-07-21 13:23
#84663 #84663
User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]
Mit lvalue-Subroutinen kann man die haessliche Schreibweise fuer Setter-Methoden:
Code: (dl )
$object->foo($newval)
durch eine Zuweisung ersetzen:
Code: (dl )
$object->foo = $newval
Das CPAN-Modul Class::Accessor::Lvalue kann das:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
package Foo;
use base 'Class::Accessor::Lvalue';
_ _ PACKAGE _ _ ->mk_accessors(qw(foo bla bar));

sub new { bless {}, shift }

package main;

$foo_obj = Foo->new;
$foo_obj->foo = 123;
warn $foo_obj->foo;

(Grrr, kann man eigentlich den Bug mit dem doppelten Unterstrich eigentlich auf die Schnelle loesen?)

View full thread Was ist eigentlich ein LVALUE?: Seltsamer Rückgabewert von ref