Skip to content
This repository
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

executable file 40 lines (22 sloc) 0.646 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
#!/usr/bin/env perl
package ubic_update;

use strict;
use warnings;

# ABSTRACT: update ubic metadata

=head1 SYNOPSIS

ubic-update [--help]

=head1 DESCRIPTION

This script maintains ubic portmap - small database which allows to get service by port without full traversing of all services.

=cut

use Getopt::Long 2.33;
use Pod::Usage;

return 1 if caller();

GetOptions() or pod2usage(2);
pod2usage(2) if @ARGV;

use Ubic::PortMap;

Ubic::PortMap::update();

=head1 FUTURE DIRECTIONS

This script can (and possibly will) be reimplemented as ubic service.

=head1 SEE ALSO

There is an entry about ubic-update in L<Ubic::Manual::FAQ>.

=cut
Something went wrong with that request. Please try again.