Skip to content

Instantly share code, notes, and snippets.

@gerdr
Created May 6, 2012 18:01
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gerdr/2623550 to your computer and use it in GitHub Desktop.
Save gerdr/2623550 to your computer and use it in GitHub Desktop.
perl6-examples/shootout
$ time perl n-body.p5.pl 1000
real 0m0.109s
user 0m0.062s
sys 0m0.046s
$ time perl6 n-body.p6.pl 1000
real 0m20.322s
user 0m20.232s
sys 0m0.077s
---
$ time perl k-nucleotide.p5.pl <k-nucleotide.input
real 0m0.074s
user 0m0.046s
sys 0m0.030s
$ time perl6 k-nucleotide.p6.pl <k-nucleotide.input
real 0m3.195s
user 0m3.057s
sys 0m0.124s
---
$ time perl fasta.p5.pl 1000
real 0m0.078s
user 0m0.046s
sys 0m0.030s
time perl6 fasta.p6.pl 1000
real 0m7.948s
user 0m7.737s
sys 0m0.217s
---
$ time perl revcomp.p5.pl <revcomp.input
real 0m0.062s
user 0m0.030s
sys 0m0.030s
$ time perl6 revcomp.p6.pl <revcomp.input
real 0m47.831s
user 0m47.439s
sys 0m0.311s
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment