http-useragent-subst-not-found.p6

#!/usr/bin/env perl6                                                                                                                              
                                                                                                                                                  
use v6;                                                                                                                                           
                                                                                                                                                  
use HTTP::UserAgent;                                                                                                                              
                                                                                                                                                  
my $ua = HTTP::UserAgent.new;                                                                                                                     
$ua.timeout = 10;                                                                                                                                 
                                                                                                                                                  
my $response = $ua.get("https://pricing.us-east-1.amazonaws.com/offers/v1.0/aws/index.json");                                                     
                                                                                                                                                  
if $response.is-success {                                                                                                                         
    say $response.content;                                                                                                                        
} else {                                                                                                                                          
    die $response.status-line;                                                                                                                    
}