my ($class,$alias_for) = @_; eval "package $class;"<<'SUB'; sub find_ids { my ($class,$params) = @_; # Do something with $alias_for return SUPER::find_ids->($class,\%params); }); SUB
it gives me the message:
Variable "$alias_for" will not stay shared at ...
In reply to Re^2: Using SUPER in dynamically generated subs
by clinton
in thread Using SUPER in dynamically generated subs
by clinton
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |