#(no this isn't my actuall code but a simplified example)

@vars =("num", "alpha" );
$num=1; $alpha="a";

for ($i=0; $i<@vars;$i++){
# create an array @num with value from $num, etc
# create an array @alpha with value from $alpha, etc
push ( @($vars[$i]), $($vars[$i]);
}
##</code><code>##

 
push (@num, $num) and push (@alpha, $alpha)