I'm getting
syntax error at C:\test\lvalue.pl line 10, near "$property :" BEGIN not safe after errors--compilation aborted at C:\test\lvalue.pl +line 10.
from
BEGIN { no strict 'refs'; for my $property (qw/id debug display_time default_text/) { *$property : lvalue = sub { $_[SELF]->{$property} }; } }
What am I doing wrong?
Examine what is said, not who speaks.
In reply to Re: $foo->bar = 14;
by BrowserUk
in thread $foo->bar = 14;
by Juerd
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |