my $var1 = $var_old;