## Skip this step (and the split) if the array started out as a string! $string = join '', qw(a a b h a g s j s z u u e);; print substr( $string, $_ ) for 0 .. length( $string ) -1;; aabhagsjszuue abhagsjszuue bhagsjszuue hagsjszuue agsjszuue gsjszuue sjszuue jszuue szuue zuue uue ue e