#!/usr/bin/env perl
use warnings;
use strict;
# PODNAME: sync_cpantesters
# ABSTRACT: Sync CPAN testers failure reports to local directories
use Getopt::Long;
use App::sync_cpantesters;
GetOptions(
'uri|u=s' => \my $uri,
'author|a=s' => \my $author,
'dir|d=s' => \my $base_dir,
'verbose|v' => \my $verbose,
'ignore|i' => \my $ignore,
'help|h' => sub { exit usage() },
) or do { exit usage() };
App::sync_cpantesters->new(
uri => $uri,
author => $author,
base_dir => $base_dir,
verbose => $verbose,
ignore => $ignore,
)->run;
sub usage {
print <<END;
usage: [perl] nytprofhtml [opts]
--author, -a <cpanid> Download reports for this author (e.g., "MARCEL")
--uri, -u <uri> Download reports from this URI
--dir, -d <dir> Where to download reports to (does tilde expansion)
--ignore, -i <regex> Ignore distribution names matching this regular expression
--verbose, -v Be more verbose
--help, -h Print this message
You have to use exactly one of C<--author> or C<--uri>.
See 'perldoc App::sync_cpantesters' for details and copyright.
END
return 1;
}
__END__
=pod
=head1 NAME
sync_cpantesters - Sync CPAN testers failure reports to local directories
=head1 VERSION
version 1.111470
=head1 INSTALLATION
See perlmodinstall for information and options on installing Perl modules.
=head1 BUGS AND LIMITATIONS
No bugs have been reported.
Please report any bugs or feature requests through the web interface at
L<http://rt.cpan.org/Public/Dist/Display.html?Name=App-sync_cpantesters>.
=head1 AVAILABILITY
The latest version of this module is available from the Comprehensive Perl
Archive Network (CPAN). Visit L<http://www.perl.com/CPAN/> to find a CPAN
site near you, or see L<http://search.cpan.org/dist/App-sync_cpantesters/>.
The development version lives at L<http://github.com/hanekomu/App-sync_cpantesters>
and may be cloned from L<git://github.com/hanekomu/App-sync_cpantesters.git>.
Instead of sending patches, please fork this project using the standard
git and github infrastructure.
=head1 AUTHOR
Marcel Gruenauer <marcel@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2007 by Marcel Gruenauer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut