gistfile1.txt

use JSON::Fast;
use HTTP::UserAgent;

my $job = ua-get-json 'https://api.travis-ci.org/jobs/212455149';
$job<log>.lc ~~ m/
    [
          "git error: fatal: unable to access"
        | "git error: error: rpc failed"
        | 'the command "git fetch origin +refs/pull/' \d+ '/merge:" failed and exited with 128 during .'
    ]
/;

say "Done matching; measure the RAM!";
sleep;

sub ua-get-json ($url) {
    my $res = HTTP::UserAgent.new.get: $url;
    fail $res.status-line unless $res.is-success;
    from-json $res.content;
}