Google-Cloud-Compute-V1
view release on metacpan or search on metacpan
lib/Google/Cloud/Compute/V1/RegionSnapshotsClient.pm view on Meta::CPAN
service => 'google.cloud.compute.v1.RegionSnapshots',
method => 'List',
request => $request,
response_class => $response_class,
});
return $response;
}
sub set_iam_policy {
my ($self, %params) = @_;
my $request_class = 'Google::Cloud::Compute::V1::Compute::SetIamPolicyRegionSnapshotRequest';
my $request = eval { $request_class->new(\%params) } || eval { $request_class->new(%params) } || ($request_class->can('encode') ? $request_class->encode(\%params) : \%params);
my $response_class = 'Google::Cloud::Compute::V1::Compute::Policy';
my $response = $self->transport->call({
service => 'google.cloud.compute.v1.RegionSnapshots',
method => 'SetIamPolicy',
request => $request,
response_class => $response_class,
});
return $response;
}
sub set_labels {
my ($self, %params) = @_;
my $request_class = 'Google::Cloud::Compute::V1::Compute::SetLabelsRegionSnapshotRequest';
my $request = eval { $request_class->new(\%params) } || eval { $request_class->new(%params) } || ($request_class->can('encode') ? $request_class->encode(\%params) : \%params);
my $response_class = 'Google::Cloud::Compute::V1::Compute::Operation';
my $response = $self->transport->call({
service => 'google.cloud.compute.v1.RegionSnapshots',
method => 'SetLabels',
request => $request,
response_class => $response_class,
});
return $response;
}
sub test_iam_permissions {
my ($self, %params) = @_;
my $request_class = 'Google::Cloud::Compute::V1::Compute::TestIamPermissionsRegionSnapshotRequest';
my $request = eval { $request_class->new(\%params) } || eval { $request_class->new(%params) } || ($request_class->can('encode') ? $request_class->encode(\%params) : \%params);
my $response_class = 'Google::Cloud::Compute::V1::Compute::TestPermissionsResponse';
my $response = $self->transport->call({
service => 'google.cloud.compute.v1.RegionSnapshots',
method => 'TestIamPermissions',
request => $request,
response_class => $response_class,
});
return $response;
}
sub update_kms_key {
my ($self, %params) = @_;
my $request_class = 'Google::Cloud::Compute::V1::Compute::UpdateKmsKeyRegionSnapshotRequest';
my $request = eval { $request_class->new(\%params) } || eval { $request_class->new(%params) } || ($request_class->can('encode') ? $request_class->encode(\%params) : \%params);
my $response_class = 'Google::Cloud::Compute::V1::Compute::Operation';
my $response = $self->transport->call({
service => 'google.cloud.compute.v1.RegionSnapshots',
method => 'UpdateKmsKey',
request => $request,
response_class => $response_class,
});
return $response;
}
1; # End of Google::Cloud::Compute::V1::RegionSnapshotsClient
__END__
=head1 NAME
Google::Cloud::Compute::V1::RegionSnapshotsClient - Client library for Google Cloud Services
=head1 SYNOPSIS
use Google::Cloud::Compute::V1::RegionSnapshotsClient;
use Google::Auth;
my $auth = Google::Auth->default();
# 1. High-performance gRPC Transport (Default)
my $grpc_client = Google::Cloud::Compute::V1::RegionSnapshotsClient->new(
credentials => $auth,
transport => 'grpc', # Optional: 'grpc' is default
);
# 2. HTTP/REST Transport
my $rest_client = Google::Cloud::Compute::V1::RegionSnapshotsClient->new(
credentials => $auth,
transport => 'rest',
);
# Execute service methods
my $res = $grpc_client->some_method( %params );
=head1 DESCRIPTION
C<Google::Cloud::Compute::V1::RegionSnapshotsClient> is an auto-generated client library for Google Cloud Services.
It provides a unified client interface supporting both high-performance HTTP/2 gRPC and HTTP/REST transports, with automatic Google Cloud Application Default Credentials (ADC) resolution and typed Protocol Buffers message handling.
=head1 SOURCE
Generated from the following Protocol Buffers schemas:
=over 4
=item * C<google/cloud/compute/v1/compute.proto>
( run in 0.904 second using v1.01-cache-2.11-cpan-7e94247ccb0 )