diff options
| -rw-r--r-- | crawl.pl | 21 |
1 files changed, 12 insertions, 9 deletions
@@ -4,23 +4,26 @@ use warnings; use lib ('lib'); use githubexplorer; use Getopt::Long; +use YAML::Syck; GetOptions( 'deploy' => \my $deploy, 'profiles' => \my $profiles, 'repo' => \my $repo, - 'graph' => \my $graph, + 'graph' => \my $graph, + 'conf=s' => \my $conf, ); +my $conf_data = LoadFile($conf); + my $gh = githubexplorer->new( - seed => [qw/franckcuny/], - api_token => $ENV{'GITHUB_APIKEY'}, - api_login => $ENV{'GITHUB_LOGIN'}, - with_repo => $repo, - connect_info => - [ 'dbi:SQLite:dbname=test.sqlite', '', '', { AutoCommit => 1 } ], + seed => [qw/franckcuny/], + api_token => $ENV{'GITHUB_APIKEY'}, + api_login => $ENV{'GITHUB_LOGIN'}, + with_repo => $repo, + connect_info => $conf_data->{connect_info}, ); -$gh->deploy if $deploy; +$gh->deploy if $deploy; $gh->harvest_profiles if $profiles; -$gh->gen_graph if $graph; +$gh->gen_graph if $graph; |