view release on metacpan or  search on metacpan

bin/rt-import-aws-assets.in  view on Meta::CPAN

                }
            }
        }
    }

    return;
}

sub process_args {
    require Getopt::Long;
    local @ARGV = @_;

    my %opt;
    RT::Interface::CLI::Init( \%opt, 'help|h', 'insert|i', 'update|u', 'delete', 'type=s', 'reserved', 'region=s', 'results=i' );

    if ( delete $opt{help} ) {
        require Pod::Usage;
        Pod::Usage::pod2usage( { verbose => 2 } );
        exit;
    }

bin/rt-unlink-retired-reservations.in  view on Meta::CPAN

            RT->Logger->error("Unable to set State for asset " . $asset->Id . ", $msg") unless $ok;
        }

    }

    return;
}

sub process_args {
    require Getopt::Long;
    local @ARGV = @_;

    my %opt;
    RT::Interface::CLI::Init( \%opt, 'help|h' );

    if ( delete $opt{help} ) {
        require Pod::Usage;
        Pod::Usage::pod2usage( { verbose => 2 } );
        exit;
    }