After a small change This works perfectly fine thank you all
> {
> $scriptname = get_scriptname($recipient)
local(@_) = ($arg1,$arg2,$arg3);
do($scriptname);
>
> $output = $global::output;
> # This variable is set by the $scriptname
> do_something($output);
> }
>
> I will try it right away Should work right?
>
> Thanks
> Ram
>
>
>
> ----------------------------------------------------------
> Netcore Solutions Pvt. Ltd.
> Website: http://www.netcore.co.in
> Spamtraps: http://cleanmail.netcore.co.in/directory.html
> ----------------------------------------------------------
----------------------------------------------------------
Netcore Solutions Pvt. Ltd.
Website: http://www.netcore.co.in
Spamtraps: http://cleanmail.netcore.co.in/directory.html
----------------------------------------------------------
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
