in reply to Assign scalar value to array

@a = split //, $num;

[download]

split

In Section Seekers of Perl Wisdom