Execute( sub =>...) and (object => ...)

[Thompson, John]

I am attempting to #1 determine if a function is defined in a template
and if so #2 call it sending it parameters all from outside the
template.

 

I first thought I might just grep for [$ sub name $] and if found do:

 

my $html;

Embperl::Execute({inputfile  => $template},

                                               sub    => 'name'

                                           param  =>
[$param1,$param2,$param3],

                                           output => \$html});

 

But it doesn't seem that "param" feeds the subroutine (and it doesn't
feed the template either), so I can't figure out how to get parameters
to my function.

 

Then I thought I'd try to do:

 

my $object = Embperl::Execute({object  => $template});

if($object->can('name')) {

     $object->name($param1,$param2,$param3);

}

 

But for some reason, $object is always equal to zero. Does the template
need to have a package declaration? Not sure what I'm doing wrong.
Either of these ways would work, any help is appreciated.