$s = '1..4'; $r = \$s; @a = eval $$r; print @a;;
1 2 3 4