Sorting a character string in perl?

Question

Is there any in-built function in perl to sort characters in string like sorted() in python?

For example,

$word = "honey";

i want output as "ehnoy".

mpapec · Accepted Answer · 2014-08-26 09:59:05Z

3

You have to split string into list of chars, sort it, and join list of chars using empty string,

my $sorted = join "", sort split //, $word;

assigned ehnoy

answered Aug 26, 2014 at 9:59

mpapec

50.8k8 gold badges72 silver badges133 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Thats i know that. I want to know about only in-built functions rather than making that as list of characters and then sort.

@user3440628 you can sort only lists; there is no built-in which could sort chars inside string.

rje · Accepted Answer · 2014-08-26 15:48:53Z

2

You could embed mpapec's solution in a subroutine that makes it LOOK like Perl has it built in...

sub sorted
{
   join "", sort split //, shift;
}

my $str = "honey";

print sorted $str;

answered Aug 26, 2014 at 15:48

rje

2743 silver badges10 bronze badges