Help for this page

Select Code to Download


  1. or download this
      my $code = sub {
        # for a better way, see Tanktalus' post below
    ...
    
      return $self->$code(@params);
      # or: goto &$AUTOLOAD;
    
  2. or download this
    my @attributes = qw(color speed);
    
    ...
      *{ $attribute } = $code;
    
    } # foreach