2023-06-23 08:12:05 +02:00
|
|
|
#!/usr/bin/env perl
|
2022-07-05 22:07:23 +02:00
|
|
|
|
|
|
|
|
use HTTP::Tiny;
|
|
|
|
|
|
2023-06-23 08:12:05 +02:00
|
|
|
my $response = HTTP::Tiny->new->get('https://{{ general.network.interface_0.domain_name_eth0 }}/.well-known/openid-configuration');
|
2022-07-05 22:07:23 +02:00
|
|
|
|
|
|
|
|
die "Failed!\n" unless $response->{success};
|
|
|
|
|
|
|
|
|
|
printf $response->{content} . "\n";
|
