You already have some good answers to this question, but you can still update the $vars hash on the fly by doing this:

$vars->{'name'} = new_value;
[download]