Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 51 lines (30 sloc) 1.174 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50
#!/usr/bin/perl
# ABSTRACT: Generate and inject files into your darkpan

use strict;
use warnings;

use CPAN::Dark;
use Getopt::Long 2.38;

my $author;
GetOptions("as=s" => \$author);

my $darkpan = CPAN::Dark->new;

$author ? $darkpan->inject_files_as( $author, @ARGV ) : $darkpan->inject_files( @ARGV );

__END__

=pod

=head1 NAME

darkpan-inject - Generate and inject files into your darkpan

=head1 SYNOPSIS

    # Inject files as the default author given in the configuration
    darkpan-inject MyDistribution-0.001.tar.gz MyOtherDistribution-0.010.tar.gz

    # Inject files as a specific author, only one can be given
    darkpan-inject --as GETTY MyDistribution-Web-0.020.tar.gz MyOtherDistribution-Web-1.200.tar.gz

=head1 DESCRIPTION

Please read L<CPAN::Dark> first to understand the concept of a DarkPAN and
for getting the information how to configure those commands so that you can
use them to startup your own DarkPAN.

=head1 SEE ALSO

L<CPAN::Dark>

=head1 AUTHOR

chromatic C<< chromatic at wgz dot org >>

=head1 COPYRIGHT & LICENSE

Copyright (c) 2011, chromatic. Redistribution and modification permitted under
the terms of the Artistic License 2.0.
Something went wrong with that request. Please try again.