my $sequence = "1234567890";

my @chrsequence = split //, $sequence;

print "array has " . scalar @chrsequence . " elements: @chrsequence\n";