#!/usr/bin/env perl

use Paws;
use Data::Printer;

my $support = Paws->service('Support',
  region => 'us-east-1'
);

my $list = $support->DescribeCases;

p $list;

#!/usr/bin/env perl

use Paws;
use Data::Printer;

# Support always uses the same region
my $support = Paws->service('Support',
  region => 'us-east-1'
);

my $list = $support->DescribeCases;

p $list;

Add a comment clarify region
Add a comment clarify region

Add a comment to clarift that support always uses the same region as
stated in the docs
