Re: Sorting? [sorted]
Re: Sorting? [sorted]
- Subject: Re: Sorting? [sorted]
- From: Philip Aker <email@hidden>
- Date: Fri, 13 Sep 2002 12:32:47 -0700
John Delacour wrote:
do shell script "perl -e '
for (split /\\r/, \"" & s & "\") {/(.+?)(\\d+$)/ ;
push @_, $1. sprintf \"d$/\", $2}
for (sort @_) {s~0+(\\d+)$~$1~ ; print }'"
Sorry to be so verbose.
Tisk, tisk. In Tcl a direct call would be:
lsort -dictionary $s
or from a script file ("xxx.tcl" file):
puts [lsort -dictionary $argv]
Philip Aker
http://www.aker.ca
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.