Re: Numeric sorting WITHOUT <=>

my @sorted = sort {sprintf ('%09d', $a) cmp sprintf ('%09d', $b)} keys
+ %jetsons;
[download]

True laziness is hard work

Comment on Re: Numeric sorting WITHOUT <=> Download Code

Replies are listed 'Best First'.
Re^2: Numeric sorting WITHOUT <=> by dsheroh (Monsignor) on Oct 10, 2012 at 09:44 UTC
Don't really need the explicit `cmp`: `my @sorted = sort map { sprintf '%09d', $_ } keys %jetsons;` [download]	[reply] [d/l] [select]
Re^3: Numeric sorting WITHOUT <=> by GrandFather (Saint) on Oct 10, 2012 at 20:31 UTC
But that's nearly half the length so it can't be near half so good. :-) True laziness is hard work	[reply]