#!/usr/bin/env perl
package ubic_update;
{
$ubic_update::VERSION = '1.57';
}
use strict;
use warnings;
# ABSTRACT: update ubic metadata
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();
__END__
=pod
=head1 NAME
ubic_update - update ubic metadata
=head1 VERSION
version 1.57
=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.
=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>.
=head1 AUTHOR
Vyacheslav Matyukhin <mmcleric@yandex-team.ru>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2013 by Yandex LLC.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut