Splitting a field and putting single characters in a array

[wavex]

stringvar Casespstr := ({HP.CaseID});
stringvar array casesp;
casesp := split(Casespstr, '');
numbervar Counter := 0;
For Counter := 1 to UBound(Casesp) do
Casesp[counter] :=Casespstr[counter]&'s';
join(casesp, ', ');

The output of this is 0s

Here is what I got so far. What I am trying to do is take say a number like
00000056823234
and turn it into a array and then be able to drop the 000000 and just leave 56823234 this number will grow and I want to drop the zeros without redoing the report settings everytime it grows a number.

Any suggestions?