comparison reproctool.cgi @ 47:964393fff57e

Case insensitive sorting to match game
author Dominic Cleal <dominic@computerkb.co.uk>
date Wed, 28 Jan 2009 16:43:51 +0000
parents 783d0f954927
children 9c55ad1214ee
comparison
equal deleted inserted replaced
43:783d0f954927 47:964393fff57e
249 price => $basePrice, reprocessIsk => $isk, reprocessDetails => $repDetails }; 249 price => $basePrice, reprocessIsk => $isk, reprocessDetails => $repDetails };
250 $item_lookup->{$tname} = $item; 250 $item_lookup->{$tname} = $item;
251 } 251 }
252 252
253 # Now match up the item lookups to the input list 253 # Now match up the item lookups to the input list
254 foreach (sort @item_names) 254 foreach (sort { lc $a cmp lc $b } @item_names)
255 { 255 {
256 push @output, (exists $item_lookup->{$_} ? $item_lookup->{$_} 256 push @output, (exists $item_lookup->{$_} ? $item_lookup->{$_}
257 : { name => $_ } ); 257 : { name => $_ } );
258 } 258 }
259 259