формирование имени перепенной из самой переменной

[Timofey]

Есть переменная со значением

$var1="02";

можно ли создать переменную у которой часть имени
будет составлять значение переменной $var1, т.е. необходимо получить переменную

$var02="...";

т.е. не хочется делать много if, т.к. значение $var1 будет всегда менять было намного удобнее так делать, вот только как это сделать?

[Crazy]

$foo = "123";
$bar = "foo";

print "$$bar";

Если мне не изменяет память, опция strict отменяет эту фичу.

[SPV]

$var1 = "02";
# 1st variant
eval "\$var$var1 = 'test1'";
print $var02;
# 2nd variant
${"var$var1"} = 'test2';
print $var02;