problem in assigning values to keys

tweety has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: problem in assigning values to keys by chargrill (Parson) on Oct 09, 2006 at 15:30 UTC
tweety, This question looks remarkably similar to another node you posted very recently, how do i sort hash values?. It looks like cdarke, shmem, and johngg gave you good looking answers for that particular question, which really looks like a simplified case of this question. Update: as I do a little more reading, I see this new "question" is nothing more than a re-posted re-wording of your original question. What have you done to try to get from your previous step to this step? We're not going to write your program for you. As prasadbabu has previously recommended, please see How (Not) To Ask A Question. --chargrill `s*lil; $=join'',sort split q; s;.;grr; &&s+(.(.)).+$2$1+; $; = qq-$_-;s,.,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$,$/)` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re: problem in assigning values to keys
by chargrill (Parson) on Oct 09, 2006 at 15:30 UTC

This question looks remarkably similar to another node you posted very recently, how do i sort hash values?. It looks like cdarke, shmem, and johngg gave you good looking answers for that particular question, which really looks like a simplified case of this question. Update: as I do a little more reading, I see this new "question" is nothing more than a re-posted re-wording of your original question.

What have you done to try to get from your previous step to this step? We're not going to write your program for you.

As prasadbabu has previously recommended, please see How (Not) To Ask A Question.

--chargrill

s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
[download]

[reply]
[d/l]