[Changes for 0.32 - 2011-05-29]
[Changes for 0.31 - 2011-05-27]
[Changes for 0.22 - 2010-12-14]
[Changes for 0.21 - 2010-11-29]
[Changes for 0.20 - 2010-11-23]
package Foo;
use selfvars;
sub meth {
$self->{x} = $hopts{x};
}
# Call it like this:
$foo->meth(x => 4);
Contributed by Roman Galeev.
[Changes for 0.11 - 2010-07-09]
To the extent possible under law, åé³³ has waived all copyright and related or neighboring rights to selfvars.
[Changes for 0.10 - 2007-12-29]
package Foo;
use selfvars;
sub meth {
$self->{x} = $opts{x};
}
# Call it like this:
$foo->meth({x => 4});
# Import $self and %opts but not @args use selfvars -self, -opts;
[Changes for 0.06 - 2007-12-29]
[Changes for 0.05 - 2007-12-28]
use selfvars -self => 'this', -args => 'vars';
[Changes for 0.04 - 2007-12-28]
[Changes for 0.03 - 2007-12-28]
[Changes for 0.02 - 2007-12-28]
[Changes for 0.01 - 2007-12-27]