On Sunday, March 27, 2005 7:09 PM, Michael Doran wrote:
>I recently converted a Library of Congress (LC) call number
>normalization routine (that I had written for a shelf list application)
>into a couple of Perl LC call number sorting utilities.
Thank you for this. It seems to work well (45000+ numbers sorted, a quick
scroll-through seems to show everything sorted correctly). However, as
written, it seems to bog down on my machine after a few thousand numbers.
Instead of:
@input_list = (@input_list, $call_no);
and
@sorted_list = (@sorted_list, $call_no_array{$key});
perhaps:
push @input_list, $call_no;
and
push @sorted_list, $call_no_array{$key};
might help to speed things up (it did in my case).
I hope this helps. Thank you,
Bryan Baldus
[EMAIL PROTECTED]
[EMAIL PROTECTED]
http://home.inwave.com/eija
