From 0b083030b106113c4cc92d7b1d0cae4db1b8c00a Mon Sep 17 00:00:00 2001
From: Tokuhiro Matsuno <tokuhirom@users.sourceforge.jp>
Date: Wed, 15 Apr 2009 23:02:27 +0900
Subject: [PATCH] perl: renamed benchmark script

---
 perl/benchmark/{p1.pl => serialize.pl} | 2 ++
 1 file changed, 2 insertions(+)
 rename perl/benchmark/{p1.pl => serialize.pl} (73%)

diff --git a/perl/benchmark/p1.pl b/perl/benchmark/serialize.pl
similarity index 73%
rename from perl/benchmark/p1.pl
rename to perl/benchmark/serialize.pl
index 257932e..626ae03 100644
--- a/perl/benchmark/p1.pl
+++ b/perl/benchmark/serialize.pl
@@ -7,6 +7,8 @@ use Benchmark ':all';
 my $a = [0..2**24];
 
 print "-- serialize\n";
+print "JSON::XS: $JSON::XS::VERSION\n";
+print "Data::MessagePack: $Data::MessagePack::VERSION\n";
 cmpthese(
     -1 => {
         json => sub { JSON::XS::encode_json($a)   },