File Coverage

blib/lib/AWS/Lambda.pm
Criterion Covered Total %
statement 17 41 41.4
branch n/a
condition 0 12 0.0
subroutine 6 15 40.0
pod 0 9 0.0
total 23 77 29.8


line stmt bran cond sub pod time code
1             package AWS::Lambda;
2 20     20   290715 use 5.026000;
  20         80  
3 20     20   120 use strict;
  20         59  
  20         507  
4 20     20   87 use warnings;
  20         36  
  20         1050  
5              
6 20     20   16122 use AWS::Lambda::AL;
  20         96  
  20         1505  
7 20     20   29571 use AWS::Lambda::AL2;
  20         136  
  20         2238  
8 20     20   20292 use AWS::Lambda::AL2023;
  20         98  
  20         13717  
9              
10             our $VERSION = "0.7.0";
11              
12             # the context of Lambda Function
13             our $context;
14              
15             our $LAYERS = $AWS::Lambda::AL::LAYERS;
16             our $LAYERS_AL2 = $AWS::Lambda::AL2::LAYERS;
17             our $LAYERS_AL2023 = $AWS::Lambda::AL2023::LAYERS;
18              
19             sub get_layer_info {
20 0     0 0   my ($version, $region) = @_;
21 0           return $LAYERS->{$version}{$region};
22             }
23              
24             sub print_runtime_arn {
25 0     0 0   my ($version, $region) = @_;
26 0           print $LAYERS->{$version}{$region}{runtime_arn};
27             }
28              
29             sub print_paws_arn {
30 0     0 0   my ($version, $region) = @_;
31 0           print $LAYERS->{$version}{$region}{paws_arn};
32             }
33              
34             sub get_layer_info_al2 {
35 0     0 0   my ($version, $region, $arch) = @_;
36 0   0       $arch //= 'x86_64';
37 0           return $LAYERS_AL2->{$version}{$arch}{$region};
38             }
39              
40             sub print_runtime_arn_al2 {
41 0     0 0   my ($version, $region, $arch) = @_;
42 0   0       $arch //= 'x86_64';
43 0           print $LAYERS_AL2->{$version}{$arch}{$region}{runtime_arn};
44             }
45              
46             sub print_paws_arn_al2 {
47 0     0 0   my ($version, $region, $arch) = @_;
48 0   0       $arch //= 'x86_64';
49 0           print $LAYERS_AL2->{$version}{$arch}{$region}{paws_arn};
50             }
51              
52             sub get_layer_info_al2023 {
53 0     0 0   my ($version, $region, $arch) = @_;
54 0   0       $arch //= 'x86_64';
55 0           return $LAYERS_AL2023->{$version}{$arch}{$region};
56             }
57              
58             sub print_runtime_arn_al2023 {
59 0     0 0   my ($version, $region, $arch) = @_;
60 0   0       $arch //= 'x86_64';
61 0           print $LAYERS_AL2023->{$version}{$arch}{$region}{runtime_arn};
62             }
63              
64             sub print_paws_arn_al2023 {
65 0     0 0   my ($version, $region, $arch) = @_;
66 0   0       $arch //= 'x86_64';
67 0           print $LAYERS_AL2023->{$version}{$arch}{$region}{paws_arn};
68             }
69              
70             1;
71             __END__