sub capitalize_next {
    my ($thing) = @_;
    # uc inline increase($thing);
}