Re: A puzzle
Re: A puzzle
- Subject: Re: A puzzle
- From: Philip Aker <email@hidden>
- Date: Sat, 22 Nov 2008 03:53:51 -0800
On 2008-11-22, at 03:36:57, Skeeve wrote:
Mark J. Reed schrieb:
But incorporating your idea takes it down under 1.5:
$ time perl -le 'for (0..999999) { $total += split(/1/,$_.0)-1 };
print $total'
600000
real 0m1.405s
user 0m1.403s
sys 0m0.002s
Now try this on your machine, please:
$ time perl -e 'for ($_=1000000;--$_;) { $count+= tr/1/1/; } print
$count'
600000
real 0m1.367s
user 0m0.905s
sys 0m0.013s
600000
real 0m0.242s
user 0m0.239s
sys 0m0.003s
!
Philip Aker
echo email@hidden@nl | tr a-z@. p-za-o.@
Democracy: Two wolves and a sheep voting on lunch.
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden