3CH2DFTVNEMFSXYZULOUAJFH2M2RXDPHJJL34TI3TVR34IMTEU7AC $response = $ua->get('https://api.github.com/user/emails', Accept => 'application/vnd.github.v3+json', Authorization => "token $access_token");error($c, "Did not get a response from GitHub for email info.") unless $response->is_success;$data = decode_json($response->decoded_content) or die;my $email;foreach my $eml (@{$data}) {$email = $eml->{email} if $eml->{verified} && $eml->{primary};print STDERR "$eml->{email}\n";}