view release on metacpan or  search on metacpan

lib/App/ghmulti.pm  view on Meta::CPAN

=head1 SYNOPSIS

    use App::ghmulti;

    App::ghmulti->run();

or

   {
     local @ARGV = @my_args;
     App::ghmulti->run();
   }


=head1 DESCRIPTION

Please read the documentation in the L<ghmulti> program for more information.

B<Note>: this module uses the B<git> command line tool, so B<git> must be
installed and available via C<PATH>.

t/02-simple-tests.t  view on Meta::CPAN

use File::Basename;


BEGIN {
    use_ok( 'App::ghmulti' ) || BAIL_OUT("Could not load module 'App::ghmulti'");
}


{
  my $argv_str = '-u https://github.com/user1/repo1.git';
  local @ARGV = split(/\s+/, $argv_str);
  like(capture_stdout { App::ghmulti::run() },
       qr!^git\@github-user1:user1/repo1\.git\s*$!,
       "test args: $argv_str");
}