Skip to content

Instantly share code, notes, and snippets.

/gist:db24fb923e8076f4a369 Secret

Created September 26, 2014 14:49
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 anonymous/db24fb923e8076f4a369 to your computer and use it in GitHub Desktop.
Save anonymous/db24fb923e8076f4a369 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
$ perl -Mojo -E 'my $x = x("<p>" . ("<img>" x 500) . "</p>"); n { $x->at("img")->next->next->next } 100'
1.7799 wallclock secs ( 1.77 usr + 0.00 sys = 1.77 CPU) @ 56.50/s (n=100)
$ perl -Ilib -Mojo -E 'my $x = x("<p>" . ("<img>" x 500) . "</p>"); n { $x->at("img")->next->next->next } 100'
0.125894 wallclock secs ( 0.12 usr + 0.00 sys = 0.12 CPU) @ 833.33/s (n=100)
@s1037989
Copy link

Wow that's significant!!

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment