Help for this page
return grep { $u{ $_ } ? ( $u{ $_ }-- , $_ ) : () } split //, $str2;
return grep --$u{ $_ } >= 0, split //, $str2;