$magic=2; %items=(1, ($magic*2)); print %items; $magic+=1; print %items;