Transfering string sequence to integer array

I want to be able to transter a sequence of numbers in a string to an array.

My question is what will be the most intuitive way to behave when the number

of elements in s are different from size of isq 

Integer, Allocatable :: isq(:)
Call split ( "2/3/5", "/", isq )

subroutine split (s,delim,isq)
  Character (len=*) :: s
  Character (len=1) :: delim
  Integer :: isq

end subroutine