I also got this to work:
$Player{Location}="Inn";
$Player{Action}="Sell";
require "$Player{Location}.pl";
# this code calls on the package #####################
my $glob = $main::{$Player{Location} . "::"}{$Player{Action}}; #
$glob->(); #
######################################################
but what if I want to pass a var? then
$glob->($foo,$bar);
?????
Thanks for the help
Lou
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
