Skip to content

Instantly share code, notes, and snippets.

@tadzik

tadzik/gist:2953027

Created June 19, 2012 08:34
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/2953027 to your computer and use it in GitHub Desktop.
Save tadzik/2953027 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
┌─[tadzik@yavin4]─[~]
└─[%]─> cat jsontest.pl
use JSON::Tiny;
use Benchmark;
sub MAIN($file) {
my $content = slurp $file;
say timethis 1, { my $x = from-json $content }
}
┌─[tadzik@yavin4]─[~]
└─[%]─> perl6 jsontest.pl ~/.panda/projects.json
1340094590 1340094593 3 3
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment