view release on metacpan or  search on metacpan

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

284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
    % this-mod | cpanm -n
 
_
    args => {
        # XXX cpanm options
    },
    deps => {
        prog => 'cpanm',
    },
};
sub update_this_mod {
    require App::ThisDist;
    require IPC::System::Options;
 
    my %args = @_;
 
    my $mod = App::ThisDist::this_mod();
    return [412, "Can't determine the current module"] unless defined $mod;
    IPC::System::Options::system({log=>1, die=>1}, "cpanm", "-n", $mod);
    [200];
}