This script formats long numbers with commas. 1234567
turns into 1,234,567
on mouseUp
repeat while kv is not empty -- kv holds "1234567"
put comma&char -3 to -1 of kv before withCommasV
delete char -3 to -1 of kv
end repeat
delete char 1 of withCommasV
end mouseUp
Now go to
http://www.perl.com/pub/2000/06/commify.html
and see how much effort the perl gurus put into it.
Does it kind of remind you of a Larry Wall essay?
__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
Archives: http://www.mail-archive.com/[email protected]/
Info: http://www.xworlds.com/metacard/mailinglist.htm
Please send bug reports to <[EMAIL PROTECTED]>, not this list.
