Google-Cloud-Sql-V1
view release on metacpan or search on metacpan
lib/Google/Cloud/Sql/V1/CloudSqlBackups.pm view on Meta::CPAN
=cut
use Moo;
use Google::Auth;
use Google::gRPC::Client;
has credentials => ( is => 'ro', default => sub { Google::Auth->default() } );
has target => ( is => 'ro', default => 'sql.googleapis.com:443' );
has _grpc_client => (
is => 'ro',
lazy => 1,
builder => sub {
my $self = shift;
return Google::gRPC::Client->new(
target => $self->target,
auth_token => $self->credentials->get_token(),
);
}
);
sub create_backup {
my ($self, $args) = @_;
my $req = ref($args) eq 'HASH'
? Google::Cloud::Sql::V1::CloudSqlBackups::CreateBackupRequest->new($args)
: $args;
return $self->_grpc_client->call({
service => 'google.cloud.sql.v1.SqlBackupsService',
method => 'CreateBackup',
request => $req,
response_class => 'Google::Cloud::Sql::V1::CloudSqlResources::Operation',
});
}
sub get_backup {
my ($self, $args) = @_;
my $req = ref($args) eq 'HASH'
? Google::Cloud::Sql::V1::CloudSqlBackups::GetBackupRequest->new($args)
: $args;
return $self->_grpc_client->call({
service => 'google.cloud.sql.v1.SqlBackupsService',
method => 'GetBackup',
request => $req,
response_class => 'Google::Cloud::Sql::V1::CloudSqlBackups::Backup',
});
}
sub list_backups {
my ($self, $args) = @_;
my $req = ref($args) eq 'HASH'
? Google::Cloud::Sql::V1::CloudSqlBackups::ListBackupsRequest->new($args)
: $args;
return $self->_grpc_client->call({
service => 'google.cloud.sql.v1.SqlBackupsService',
method => 'ListBackups',
request => $req,
response_class => 'Google::Cloud::Sql::V1::CloudSqlBackups::ListBackupsResponse',
});
}
sub update_backup {
my ($self, $args) = @_;
my $req = ref($args) eq 'HASH'
? Google::Cloud::Sql::V1::CloudSqlBackups::UpdateBackupRequest->new($args)
: $args;
return $self->_grpc_client->call({
service => 'google.cloud.sql.v1.SqlBackupsService',
method => 'UpdateBackup',
request => $req,
response_class => 'Google::Cloud::Sql::V1::CloudSqlResources::Operation',
});
}
sub delete_backup {
my ($self, $args) = @_;
my $req = ref($args) eq 'HASH'
? Google::Cloud::Sql::V1::CloudSqlBackups::DeleteBackupRequest->new($args)
: $args;
return $self->_grpc_client->call({
service => 'google.cloud.sql.v1.SqlBackupsService',
method => 'DeleteBackup',
request => $req,
response_class => 'Google::Cloud::Sql::V1::CloudSqlResources::Operation',
});
}
1;
__END__
=head1 NAME
Google::Cloud::Sql::V1::CloudSqlBackups - Protocol Buffers schema definition
=head1 DESCRIPTION
Auto-generated Protocol Buffers schema definition class.
=head1 LICENSE AND COPYRIGHT
Copyright (C) 2026 Google LLC
This program is released under the Apache 2.0 license.
=cut
( run in 2.547 seconds using v1.01-cache-2.11-cpan-7e94247ccb0 )