in reply to Re: Re: (tye)Re: Aliasing Variables
in thread Aliasing Variables

Hey, cool!

That's certainly a nice way to access class members in a method, though it doesn't give the speed boost that was my primary motivation for asking the question.

Is this an existing CPAN thing, or did you just make it? I think it could be fleshed out a little, e.g. 

sub somemethod {
   my $self= shift;
   my ($a,$b,$c)= member_alias ($self, qw/a b c/);
   ...

[download]
—John

Replies are listed 'Best First'.
Re: Re: Re: Re: (tye)Re: Aliasing Variables
by miyagawa (Chaplain) on Jul 23, 2001 at 09:50 UTC
    > Is this an existing CPAN thing, or did you just make it?

    Just a hack for a minute :)
    my $x = aliasOf($self->{x}) or my($a, $b, $c) = member_alias ... won't work well, I guess.

    Mine just works because of magical (pollutional) tie'ing using @_s.

    --
    Tatsuhiko Miyagawa
    miyagawa@cpan.org

[reply]
[d/l]
[select]
      OK, how about something like: 
      member_alias ($self, qw/a b c/, my($a, $b, $c));

      [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom