Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
       sort
       map { substr $str, $_ }
       0 .. length( $str ) - 1;
    
  2. or download this
    ACDDCDAGF
    AGF
    ...
    DDCDAGF
    F
    GF
    
  3. or download this
    use strict;
    use warnings;
    ...
    
    say join q{}, @arr[ $sortedIndices[ $_ ] .. $#arr ]
       for 0 .. $#sortedIndices;
    
  4. or download this
    aaacatatz
    aacatatz
    ...
    tatz
    tz
    z