#!perl
# ABSTRACT: A command line tool to get a list of email addresses from particular Github account.
# PODNAME: github-email
use strict;
my ( $opt, $usage ) = describe_options(
'github-email %o <github username>',
[ 'username|u=s', 'Github username.', { required => 1 } ],
[ 'help|h', 'Print this message and exit.', { shortcircuit => 1 } ]
);
print( $usage->text ), exit 0 if $opt->help;
my @addresses = App::Github::Email::get_user( $opt->username );
for my $address (@addresses) {
print $address . "\n";
}
__END__
=pod
=encoding UTF-8
=head1 NAME
github-email - A command line tool to get a list of email addresses from particular Github account.
=head1 VERSION
version 0.3.3
=head1 SYNOPSIS
github-email --username <github username>
# Examples
github-email --username faraco
github-email -u faraco
=head1 AUTHOR
faraco <skelic3@gmail.com>
=head1 COPYRIGHT AND LICENSE
This software is Copyright (c) 2017-2018 by faraco.
This is free software, licensed under:
The MIT (X11) License
=cut