youpi!!! we are in the way :)
8<-----------------------
[DEBUG -> process_subs - (code $actor switch off)]
[**PERLSUBS process_subs looking for --> (cut|copy|paste|switch) returned $1 = $actor]
8<-----------------------
[**PERLSUBS find_field]
[DEBUG find_field [$actor] start --------------]
[DEBUG FLD_DEF is a variable=$actor]
but...
[**PERLSUBS process_subs looking for $orig_code --> nothing returned by &find_field($obj_fld)]
8<----------------------------
It was OK for simple values, composed values with $var's value, but broken for a single $var
see the new version:
if($fld_def =~ m/\\$/) {
$fld_def =~ s/\\$(\\w+)/$1/g;
$fld_def = eval("\\$$1");
et voila, and there is no need of no strict'refs', but I didn't understand the mechanism in Apache::Registry that makes your code fail...
NOW, I fixed that weird problem with the regex... BUT there is a new problem, with is more difficult because we are in a loop!!! AND the loop is... in the bulding of the frameset wich builds a frameset and builds a frameset... exactly like when you film the tv showing the tv...
very nice FX indeed.
So until I fix that new gag I need to stop manualy apache before it crashes, and I will stop it when I'm not working on cow ;)
seegnousoon
xiii