"Dennis G. Wicks" wrote:
> Greetings;
>
> I have a file that I need to sort and currently I am just
> sorting it by
>
> @datalist = sort(@datalist);
Try this:
> @articles = sort {substr($a, 6) + 0 <=> substr($b, 6) + 0}
> @files;
>
> but I can't figure out how to tell the sort that $a and $b
> are the first six characters of @datalist. That is numeric
> data BTW.
Joseph
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
