Changeset 24502 for lang/perl/DateTime-Lite

Timestamp:

11/20/08 20:09:10 (5 years ago)

Author:

daisuke

Message:

tweak

Location:

lang/perl/DateTime-Lite/trunk

Files:

• lib/DateTime/Lite.pm (modified) (1 diff)
• tools/benchmark/simple_create.pl (modified) (1 diff)

lang/perl/DateTime-Lite/trunk/lib/DateTime/Lite.pm

@@ -11 +11 @@
 use Time::Local qw( timegm_nocheck );
 
+our $VERSION = '0.00001';
+
 use overload (
     fallback => 1,

lang/perl/DateTime-Lite/trunk/tools/benchmark/simple_create.pl

@@ -1 +1 @@
 use strict;
 use Benchmark qw(cmpthese);
-BEGIN { $ENV{PERL_DATETIME_PP} = 1 };
 use DateTime;
 use DateTime::Lite;
+
+print "Benchmarking DateTime $DateTime::VERSION and DateTime::Lite $DateTime::Lite::VERSION\n";
+print "   (DateTime is ", $DateTime::IsPurePerl ? "NOT " : "", "using XS -- tweak PERL_DATETIME_PP to change this)\n";
 
 cmpthese(10000, {