sub load_game { $cfg->read("'$ENV{HOME}/.kenesis'"); @player = $cfg->param("player"); @enemy = $cfg->param("enemy"); $completed_quests = $cfg->param("quest"); $special_item = $cfg->param("items"); $class = $cfg->param("class"); #main_menu(); print "@player\n"; print "@enemy\n"; print "$completed_quests\n"; print "$special_item\n"; print "$class\n"; exit; }