pdl> p $v = pdl split '', '30373'
[3 0 3 7 3]