Skip to content

Instantly share code, notes, and snippets.

@tadzik

tadzik/gist:1196124

Created September 5, 2011 23:04
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 tadzik/1196124 to your computer and use it in GitHub Desktop.
Save tadzik/1196124 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
┌─[tadzik@yavin4]─[~/src/nom] (optimizer)
└─[%]─> time ./perl6 test.pl
5000050000
./perl6 test.pl 34.89s user 0.22s system 98% cpu 35.603 total
┌─[tadzik@yavin4]─[~/src/nom] (optimizer)
└─[%]─> time ./perl6 --optimize test.pl
5000050000
./perl6 --optimize test.pl 27.12s user 0.22s system 99% cpu 27.401 total
┌─[tadzik@yavin4]─[~/src/nom] (optimizer)
└─[%]─> cat test.pl
my $i = 0;
for 1..100000 {
$i = $i + $_;
}
say $i;
┌─[tadzik@yavin4]─[~/src/nom] (optimizer)
└─[%]─> figlet win!
_ _
__ _(_)_ __ | |
\ \ /\ / / | '_ \| |
\ V V /| | | | |_|
\_/\_/ |_|_| |_(_)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment