#!/usr/bin/perl

use strict;
use warnings;
use CPANDB::Generator;

my $cpan = CPANDB::Generator->new(
         cpan  => '/root/.cpan',
         sqlite => '/root/CPANDB.sqlite',
)->run;