From 2a32bcd9142b8d9f2c85c9d826473e7f108ec9bc Mon Sep 17 00:00:00 2001 From: franck cuny Date: Mon, 6 Apr 2009 12:28:10 +0200 Subject: use datetime object --- cpan-graph.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/cpan-graph.pl b/cpan-graph.pl index c2e5324..c9cf369 100755 --- a/cpan-graph.pl +++ b/cpan-graph.pl @@ -15,6 +15,9 @@ my $options = GetOptions( 'dbout=s' => \my $db_out, ); +# TODO +# generer une carte des auteurs + my $sqltest = CPAN::Testers->connect( "dbi:SQLite:dbname=" . $db_test, '', '' ); my $sqlall = CPAN::cpants->connect( "dbi:SQLite:dbname=" . $db_all, '', '' ); @@ -51,7 +54,7 @@ while ( my $dist = $dists->next ) { $map_package->update( { tests_success => $tests_success, author => $author->pauseid, - released => $dist->released, + released => $dist->released->ymd('/'), } ); -- cgit v1.2.3