Re: Class::Std, 5.6.1, and AUTOLOAD

[ikegami]

You can make something execute at compile time using BEGIN. From what you say, the following would work:

BEGIN {
   # this line starts in column 0, and seems like runtime assignment
   *ID = \&Scalar::Util::refaddr; 

   # the same for these, later: 
   *_extract_default  = _extractor_for_pair_named('default');
   *_extract_init_arg = _extractor_for_pair_named('init_arg');
   *_extract_get      = _extractor_for_pair_named('get');
   *_extract_set      = _extractor_for_pair_named('set'); 
}


# later, in Class::Std::SCR...
my %values_of : ATTR ( :init_arg<values> );

[rjbs]

Thanks. I understand compile time and how to cram code into it. The question isn't "how do I fix this problem" but "why isn't this a problem under my modern perl build?" Any idea?

[ikegami]

No idea. Maybe if I had something minimal I could run and debug.

[rjbs]

You could run the 00.load.t in Class-Std-0.0.4, heh.

I tried using this as a test case:

package CheckCheck;
use strict;
use warnings;

*INSTALLED = sub { print "EVERYTHING IS OK\n"; };

sub AUTOLOAD {
  warn INSTALLED();
}

sub GO_GO_GO {
  INSTALLED();
}

CHECK { GO_GO_GO() }

1;

...but then perl -Mcheck -e1 is fine on both 5.6.1 and 5.8.7; no clue.