Subject: | To consider: :Self, :Arg, and :Member attributes from POE::Stage tinkering |
In a fit of temporary (?) insanity, I decided that I hated @_,
$self->{member}, so I wrote handlers for :Self and :Member attributes to
sweeten their syntax a little:
my $self :Self; # my $self = $_[0];
my $member :Memb; # my $member = $self->{member};
The code is rather simple. You're free to incorporate it into
POE::Session::AttributeBased. I think you'll be able to retool it
easily for various @_ offsets and $_[HEAP] members, at the very least.
Sample usage:
http://thirdlobe.com/projects/poe-stage/browser/trunk/lab/sweet-at-under.perl
Attribute handlers:
http://thirdlobe.com/projects/poe-stage/browser/trunk/lab/SweetAtUnder.pm