sub updatevars {
    my $set = shift;
    $var1 = $myhash{$set}[0];
    $var2 = $myhash{$set}[1];
}